Moderatori: Anthony47, Flash30005
If myPass = "" Then
Istruzioni per chiedere la Password
End If
Dim cippa As Long 'Visibile nel Modulo
Sub uno()
If cippa = 0 Then
cippa = cippa + 1
Beep
End If
End Sub
Sub due()
If cippa > 0 Then
Beep
End If
End Sub
Sub Dieci()
If Pippa > 0 Then
Beep
End If
End Sub
Public Pippa As Long 'Visibile nel Progetto
Sub tre()
If cippa > 0 Then
Beep
End If
End Sub
Sub Quatt()
If Pippa = 0 Then
Pippa = 10
Beep
End If
End Sub
Torna a Applicazioni Office Windows
Inserire add.in nella barra di avvio veloce in excel 2003 Autore: Ricky0185 |
Forum: Applicazioni Office Windows Risposte: 4 |
Excel: problema con date se devo unirle a testi Autore: valle1975 |
Forum: Applicazioni Office Windows Risposte: 5 |
Visitano il forum: Nessuno e 4 ospiti