DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
arkadaşlar ekteki tablonun boş form adlı sayfasına gerekli açıklamaları yazdım. yardımlarınızı bekliyorum teşekkürler.
Option Explicit
Sub sayfa_oluştur_61()
Dim ts
ts = Range("C1")
Sheets("Boş Form").Copy after:=Sheets(Sheets.Count)
Sheets(Sheets.Count).Name = ts
End Sub