i tuoi suggerimenti e quelli di bart sono stati una manna e mi hanno
portato ad un buon punto
ora sorge un nuovo problema con un'area che deve contenere una stringa
tipo la descrizione dell'articol e non dati numerici
ho provato in questo modo
sub ver_cel
dim oDoc as object
dim oSheet as object
dim oDATA as object
dim oARTICOLO as string
dim oCARICO as object
dim oSCARICO as object
dim oultimo_prezzo as object
oDoc = ThisComponent
oSheet = oDoc.Sheets.getByName ("Archivio Movimentazioni")
oDATA = oSheet.getCellRangeByName ("DATA")
IF oDATA.value = 0 THEN
MsgBox (" MANCA LA DATA")
End If
sARTICOLO = oSheet.getCellRangeByName ("ARTICOLO")
IF sARTICOLO = "" THEN
MsgBox (" MANCA L'ARTICOLO")
End If
ma non funziona
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
