textboxlara göre çalışma sayfası oluşturma

[osmanfenerli1907]

merhaba
örnek dosyayı ekledim
kaydet butonuna tıklayınca textboxlara bişe yazılmış olanlardan ne yazıldıysa o adlı çalışma sayfası oluşacak.örneğin textbox1 e osman yazınca osman adlı çalışma sayfası oluşturacak.daha sonra textbox1 e gelip evren yazıp kaydete tıklarsam osman çalışma sayfasının adını değiştirip evren yapacak.umarım anlatabilmişimdir.şimdiden teşekkürler.

 

[osmanfenerli1907]

evren hocam yardımlarınızı bekliyorum

 

[ynmcan]

merhaba
örnek dosyayı ekledim
kaydet butonuna tıklayınca textboxlara bişe yazılmış olanlardan ne yazıldıysa o adlı çalışma sayfası oluşacak.örneğin textbox1 e osman yazınca osman adlı çalışma sayfası oluşturacak.daha sonra textbox1 e gelip evren yazıp kaydete tıklarsam osman çalışma sayfasının adını değiştirip evren yapacak.umarım anlatabilmişimdir.şimdiden teşekkürler.

Syn. Osman;
Örnek dosyayı inceleyin. işinize yararmı ?

Private Sub CommandButton1_Click()
For i = 1 To 10
Sheets(i).Name = UserForm1("TextBox" & i).Value
Next i
End Sub
Private Sub UserForm_Initialize()
For i = 1 To 10
UserForm1("TextBox" & i).Value = Sheets(i).Name
Next i
End Sub

 

[osmanfenerli1907]

malesef bu tam değil.çünkü butona tıklayınca ilk önce textboxlara 5 tane isim yazarsam 5 tane çalışma safyası oluşturacak textboxlara göre adı olacak.daha sonra gelip örneğin boş olan 6.textboxa birşey yazıp tıklayınca 1 tane daha sayfa oluşturacak.daha sonra örneğin 2.textboxu değiştirirsem o adlı çalışma sayfanın ismini değiştirecek.yardımlarınızı bekliyorum.

 

[Orion1]

Dosyanız ektedir.
Bu şekilde olur.

 

[osmanfenerli1907]

hocam şöyle bir olay olacak.örneğin formda 10 textbox var.ben bunlara girecem kelimeleri ona göre sayfa açılacak eğer boşsa açmayacak.sonra userformu tekrar açtığımda zaten sayfa adları textboxlara gelecek.ordan herhangi birini değiştirip butona tıklayıncada safya adı değişecek.

 

[Orion1]

hocam şöyle bir olay olacak.örneğin formda 10 textbox var.ben bunlara girecem kelimeleri ona göre sayfa açılacak eğer boşsa açmayacak.sonra userformu tekrar açtığımda zaten sayfa adları textboxlara gelecek.ordan herhangi birini değiştirip butona tıklayıncada safya adı değişecek.

Öyle olmaz.
hangi sayfanın değişeceğini nerden bilecek.
Ben o sebeble listbox koydum.
Seçip değiştiresin diye
ayrıca sayfa sayısı 10 dan fazla olursa ne yapıcan.Biraz esnek düşünmek lazım bu konuları.

 

[osmanfenerli1907]

10 dan fazla olmayacak.birde örneğin textbox1 e osman yazıp kaydettip safyamız oluşturdu.daha sonra gidecek osmanı bulacak ne yazarsam o isim ile değiştirecek.