Forma - chyba v kode
Napsal: 18 led 2012 09:17
Zdravim,spravil som si v exceli formu,ktora mi nacita pri dvojkliku data z cennika,len neviem teraz ako ked chcem jednotlive polozky vybrat z formy a presunut do druheho listu.Vytvoril som si na forme tlacitko pridat do faktury len stale mam chybu v kode a nechce mi to pridat veci z formy.
forma,ktora mi nacita pri dvojkliku data z druheho zositu
Dakujem
forma,ktora mi nacita pri dvojkliku data z druheho zositu
Kód: Vybrat vše
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
On Error GoTo von
If (Target.Row > 9) Then
If (Len(Target.Cells) > 0) Then
Sheets("Cenník").Range("A" + Trim(Str(Target.Row)) + ":B" + Trim(Str(Target.Row))).Select
Dim i, i2 As Integer
i2 = 0
For i = 9 To 220
i2 = i2 + 1
forma.okno.AddItem (Str(i2) + ". " + Sheets("Cenník").Cells(i, 1) + " " + Sheets("Cenník").Cells(i, 2) + " ( riadok " + Str(i) + " )")
Next i
forma.Show
End If
End If
von:
End Sub
Dakujem