Soru: Bir çalışma sayfasındaki rasgele bir hücrenin (B5) her seçilerek değişmesinde (Doğrulama list (Validation)'den yapılan değiştirme) yeni bir çalışma sayfası (worksheets) eklesin ve worksheets.name=Range("B5").Value olsun istiyorum.Buraya kadar tamam ancak B5' de yeni seçtiðim ad daha önce açılmış worksheets'ler arasında varsa beni uyarsın ve yeni çalışma sayfası açmasın istiyorum. Daha önce açılmış çalışma sayfalarının isimleri arasında B5' in yeni değerinin var olup olmadığı nasıl yaptırılır.
Cevap: Bu sorduğunuz sorunun detayını bu ayki PCMAGAZINE dergisinde Excel Makroları bölümde detaylı olarak anlatmıştım. Dilerseniz konunun detayları için dergiyi gözden geçirin. ben sizin sorunuzun cevabı olan makro kodunu aşağıda verdim.
Sub SayfaAra()
Dim i As Integer
For i = 1 To Worksheets.Count
If Worksheets(i).Name = Range("B5").Value Then
MsgBox "Bu isimde bir sayfa var"
Exit Sub
End If
Next i
End Sub
Hiç yorum yok:
Yorum Gönder