xam99
00lunedì 27 febbraio 2017 18:26
Ciao a tutti.
Un aiuto.
Mi incasino sempre con gli if else endif
Ho 2 celle che devono sempre essere tutte e due compilate.
se B1 è vuota msgbox1...
se B2 è vuota msgbox2...
------------------------------------------------------------------------
Dim ART1, ART2 As String
ART1 = ActiveSheet.Range("B1").Value
ART2 = ActiveSheet.Range("B2").Value
If ART1 = "" Then
MsgBox "devi inserire un ARTICOLO 1!", vbExclamation, "ATTENZIONE!"
Exit Sub
'End If
If ART2 = "" Then
MsgBox "devi inserire un ARCOLO 2!", vbExclamation, "ATTENZIONE!"
Exit Sub
------------------------------------------------------------------------
xam
patel45
00lunedì 27 febbraio 2017 18:49
If ART1 = "" Then
MsgBox "devi inserire un ARTICOLO 1!", vbExclamation, "ATTENZIONE!"
Exit Sub
ElseIf ART2 = "" Then
MsgBox "devi inserire un ARTICOLO 2!", vbExclamation, "ATTENZIONE!"
Exit Sub
End If
tanimon
00lunedì 27 febbraio 2017 18:57
ciao
ed un saluto a Patel
questa discussione come è finita?
ciao
Frank
xam99
00lunedì 27 febbraio 2017 19:41
Grazie patel,
è ok.
xam