Spreadsheet ile userforma bilgi almak

[TİKOS]

Arkadaşlar daha önce bu formu göndermiştim. Userforma bilgi getirilmesi için.
Spreadsheet yükledim. P&L sheetindeki verilerin tabloya getirilmesi için yardımcı olurmusunuz.

teşekkürler

 

[Levent Menteşoğlu]

İlgili butona aşağıdaki kodları yazarak deneyin.

Private Sub CommandButton2_Click()
Set s1 = Sheets("P&L")
s1.[a1:n42].Copy
Spreadsheet1.[a1].Paste
Spreadsheet1.[a:h].EntireColumn.AutoFit
Application.CutCopyMode = False
Spreadsheet1.[a1].Select
End Sub

 

[TİKOS]

Levent hocam çok teşekkürler.
Sizden ricam kolon ayarlarının excel tablosundaki gibi gelmesini nasıl sağlarım. Spreadsheet1.[a:h].EntireColumn."AutoFit"
Orada yaptığım kolon ayarlarının aynısının gelmesini istiyorum.
Şimdiden teşekkürler