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
[Ovu poruku je menjao bane_mt dana 03.07.2012. u 10:09 GMT+1]
[Ovu poruku je menjao bane_mt dana 03.07.2012. u 10:09 GMT+1]
 |  |
 |
