input forma + prenos inputa u sheet2

pozdrav,

ovako imam jedan mali problem

u excelu imam jedan commandbuton "naziv i organizacija" u koju korisnik unosi naziv organizacije i to ide u sheet2 pod naziv i organizacija i to radi,

ali pri kreiranju drugog commandbutona "adresa i država" input ide u sheet 2 ali u polje naziv i organizacija a ne u adresa i drzava..

kako to da rijesim.....

primjer za downlaod http://www.freeuploadshare.com/files/DgZK8a1341183471.html


Private Sub DugmeOK_Click()
' Aktiviraj Sheet1
' Sheets("Sheet1").Activate





' Odredi lokaciju
SledeciRed = _
Application.WorksheetFunction.CountA(Range("A1"))

'

'Prenesi podatke
Cells(SledeciRed, 1) = TekstAdresaISjedište.Text

' Ispraznite kontrole za sledeci unos
TekstAdresaISjedište.Text = ""
TekstAdresaISjedište.SetFocus

' Provjeri da li je upisano ime
If TekstAdresaISjedište.Text = "" Then
MsgBox "Upisali ste adresu i sjedište"
Exit Sub
End If
End Sub

Private Sub DugmeOdustani_Click()
Unload UserForm4
End Sub

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMeni Then
lngR = MsgBox("Ne možete tako zatvoriti obrazac!", _
vbDaNe + vbCritical)
Cancel = True
End If
End Sub

Predpostavljam da razlog zasto ti niko do sada nije pomogao je sto si prilozeni fajl "zastitio" nekom LogIn formom koju ne mozes jednostavno iskljuciti vec se mora na drugi nacin zaobici, zatim fajl si prilozio preko nekog drugog sajta gde se mora cekati 60 sec da bi ga neko skinuo, a mogao si jednostavno ovde na forumu okaciti fajl

22. Upload fajla uz poruku.
http://www.elitesecurity.org/faq/

Evo odradio sam ti nesto, nadam se da si upravo to zeleo, u prilogu je primer

Potpis

[email protected]=