Inserire MsgBox in una macro



  • Inserire MsgBox in una macro
    di Enrico (utente non iscritto) data: 20/02/2017 19:26:21

    Ciao a tutti, premetto che non sono un esperto di vba, ma mi sto avvicinando a questo mondo. Ecco il motivo per cui vi chiedo AIUTOOOOO ... Ho la necessità di inserire 1 o meglio 2 MsgBox all'interno del seguente codice (spero di aver usato il termine corretto) che blocca le celle dopo l'inserimento del dato. Il codice l'ho trovato in un altro forum navigando nella mia disperazione... Il primo, una volta selezionata la cella, dovrebbe essere "Inserire il dato" con la possibilità di inserire il dato nella finestra che si è appena aperta, mentre il secondo dovrebbe essere "Sei sicuro di voler confermare ? Si ricorda che non sarà più possibile modificare il dato !!!". Inoltre chiedo se è possibile evitare di bloccare la cella se al suo interno non inserisco nulla, infatti se seleziono la cella, ma non inserisco nulla la cella si blocca lo stesso. Non so se sia possibile risolvere il problema anche se ho capito che vba è un po' come la fantasia dove tutto (o quasi) è possibile. Ringrazio fin da ora chi mi vorrà aiutare. GRAZIE MILLE a tutti fin da ora.

    Enrico

    PS Se avete soluzioni alternative a questo codice sono ben accette.

     
    Option Explicit
     
    Private Sub Worksheet_Change(ByVal Target As Range)
       If Not Intersect(Target, Range("A1:A500")) Is Nothing Then
          Me.Unprotect "MiaPassword" 
          Target.Locked = True
          Me.Protect "MiaPassword"
       End If
    End Sub



  • di patel data: 20/02/2017 19:49:48

    non ho capito bene lo scopo, uma macro del genere ti impedisce di lavorare