*Bisa !*

Misal
~ data yg akan diinput ada di Sheet1 cell A1 (atau mungkin textbox1 di suatu
userform)
~ tempat yg akan menjadi Output ada di 5 cell yaitu
Cell F4 di Sheet2, sampai Sheet6

With Sheet1.Range("A1")
Sheet2.Range("F4").Value = .Value
Sheet3.Range("F4").Value = .Value
Sheet4.Range("F4").Value = .Value
Sheet5.Range("F4").Value = .Value
Sheet6.Range("F4").Value = .Value
End With

Mungkin yg pak Dedi Kom maksudkan adalah: pengisian akan terus berlanjut
ke bawah setiap kali ada INPUT BARU
Jika demikian, seperti biasanya, harus ada proses mencari BARIS TERAKHIR
di KOLOM F pada tiap Sheet2 sampai Sheet6 lebih dulu

Misa, *khusus di sheet2*
Pencarian Row Kosong pertama (salah satu cara dari banyak cara)
R = Sheet2.Range("F" & Cells.Count).End(xlUp).Row + 1

Pengisian di row tsb (Kolom F)
Sheet2.Range("F" & R).Value = Sheet1.Range("A1").Value

akan lebih jelas jika Bapak datang tidak bertangan kosong, tapi bawa sheet
data contoh..

-Hapsari-



2011/9/5 Dedi Komarudin <[email protected]>

> **
> Dear pakar Xl-Mania mohon pencerahan
> *bisakah* menggunakan satu form untuk banyak sheet dalam sekali input.
> Terima kasih
> Salam
> Dedi CliP
>

Kirim email ke