Soru Gizli Şablon sayfasından kopya oluşturma

Katılım
10 Temmuz 2012
Mesajlar
1,309
Beğeniler
38
Excel Vers. ve Dili
2016 TR
#1
Kod:
Private Sub CommandButton1_Click()
Dim i As Integer
If TextBox1.Value = "" Then
MsgBox "Sayfa Adını Yazmadınız.."
Exit Sub
End If
For i = 1 To Worksheets.Count
If Worksheets(i).Name = TextBox1.Value Then
MsgBox "Bu İsimde Bir Sayfa Var.."
Exit Sub
End If
Next i
Sheets("ŞABLON").Copy After:=Sheets(Worksheets.Count)
ActiveSheet.Name = TextBox1.Value
End Sub
Yukarıdaki kod ile ŞABLON sayfasını oluşturuyor. Ancak ŞABLON sayfasını gizlemek istiyorum, bu seferde ŞABLON sayfası oluşmuyor.
Nasıl bir düzenleme yapmam lazım.

Saygılarımla
 
Katılım
10 Temmuz 2012
Mesajlar
1,309
Beğeniler
38
Excel Vers. ve Dili
2016 TR
#3
Hamit abi
ŞABLON sayfasını gizledim. Buton ile şablon oluştur yeni isim ve dediğim zaman ŞABLON sayfası gizlenmiş olduğu için kod çalışmıyor.
Gizlenmiş sayfa üzerinden nasıl çalışabilirim
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,166
Beğeniler
29
Excel Vers. ve Dili
Excel 2007 Türkçe
#4
Ben denedim, gizli iken kod çalıştı. Ayrıca verdiğiniz kod, ŞABLON sayfasından kopyalama yapıyor. ŞABLON sayfasını oluşturmuyor.
 
Katılım
10 Temmuz 2012
Mesajlar
1,309
Beğeniler
38
Excel Vers. ve Dili
2016 TR
#5
Hamit abi
İLGİLİ DOSYA

Combobox ile veri seçip ekle dediğininiz zaman seçilen ad ile şablon açmıyor.
Sil dediğimiz zamanda silmiyor.

Bakabilir misin abi sana zahmet
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,166
Beğeniler
29
Excel Vers. ve Dili
Excel 2007 Türkçe
#6
Aşağıdaki şekilde deneyin.
Kod:
Sheets("ŞABLON").Visible = True
Sheets("ŞABLON").Copy After:=Sheets(Worksheets.Count)
Sheets("ŞABLON").Visible = False
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,166
Beğeniler
29
Excel Vers. ve Dili
Excel 2007 Türkçe
#8
Başka bir şey olmalı. Benim yaptığım ŞABLON sayfasını önce görünür yapıp sonra gizlemek. Önceki kod ile arasında bir fark yok.
 
Üst