Arkadaşlar selam
Hazırladığım programda aşağıdaki gibi modüller içine yazılmış birçok fonksiyon mevcut.
Ancak fonksiyonun bağlı olduğu hücrede bi değişiklik yaparsam fonksiyon çalışıyor.
Bunun yanında tüm fonksiyonları tek bir butona basarak çalıştırabilirmiyim?
Function tur1an1(deger As String)
Dim i As Integer
For i = 6 To 42
If deger = Sayfa16.Cells(i, 3) Then
tur1an1 = Sayfa16.Cells(i, 6)
If deger = "" Then
tur1an1 = ""
End If
Exit For
End If
Next
End Function
ÇOK TEÃEKKÜR EDERİM
Hazırladığım programda aşağıdaki gibi modüller içine yazılmış birçok fonksiyon mevcut.
Ancak fonksiyonun bağlı olduğu hücrede bi değişiklik yaparsam fonksiyon çalışıyor.
Bunun yanında tüm fonksiyonları tek bir butona basarak çalıştırabilirmiyim?
Function tur1an1(deger As String)
Dim i As Integer
For i = 6 To 42
If deger = Sayfa16.Cells(i, 3) Then
tur1an1 = Sayfa16.Cells(i, 6)
If deger = "" Then
tur1an1 = ""
End If
Exit For
End If
Next
End Function
ÇOK TEÃEKKÜR EDERİM