Help
"Ivica Lopar" wrote in message news:...
I have error in this code.help
Sub OdabirKnjige()
With DialogSheets("DialogProdaja")
red = .DropDowns(1).ListIndex + 1
cijena = Worksheets("Knjige").Cells(red, 2).Value
.EditBoxes(4).Text = cijena
.EditBoxes(3).Text = 1
.EditBoxes(5).Text = 0
.Labels(8).Text = cijena
.Spinners(1).Value = 1
.Spinners(2).Value = 0
End With
|