CommandButton85.Caption

ismailozkan4224

Altın Üye
Katılım
22 Kasım 2011
Mesajlar
175
Excel Vers. ve Dili
2007 türkçe
Altın Üyelik Bitiş Tarihi
22-12-2027
değerli arkadaşlar user form üzerinde CommandButton85 butonum var. form açıldığında bu butonun caption özelliği
sayfa 1-30 arasında aşağıdaki gibi oluyor. yani istediğimi yapıyor.
fakat sayfa ismi "kapak","veri" gibi metin olduğunda hata veriyor. nasıl bir çözüm önerirsiniz. yani sayfa 1-30 haricinde bir sayfaya gittiğimde o sayfanın ismini yazmasını istiyorum.
If ActiveSheet.Name >= 1 Then
CommandButton85.Caption = "Şikayet Eden - " & ActiveSheet.Name & vbLf & Cells(5, 13)
'Else: CommandButton85.Caption = ActiveSheet.Name
End If
If ActiveSheet.Name >= 6 Then
CommandButton85.Caption = "Şikayet Edilen - " & ActiveSheet.Name - 5 & vbLf & Cells(5, 13)
'Else: CommandButton85.Caption = ActiveSheet.Name
End If
If ActiveSheet.Name >= 11 Then
CommandButton85.Caption = "TANIK - " & ActiveSheet.Name - 10 & vbLf & Cells(5, 13)
'Else: CommandButton85.Caption = ActiveSheet.Name
End If
If ActiveSheet.Name < 1 Then
CommandButton85.Caption = ActiveSheet.Name
End If
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,712
Excel Vers. ve Dili
Excel 2019 Türkçe
Muhtemelen bunun gibi satırlardan kaynaklanıyor
Kod:
If ActiveSheet.Name >= 1 Then
 
Üst