Risultati da 1 a 3 di 3

Discussione: Controllo con macro



  1. #1
    L'avatar di robiome
    Clicca e Apri
    Data Registrazione
    May 2016
    Località
    Trento
    Età
    52
    Messaggi
    2
    Versione Office
    2010
    Likes ricevuti
    0
    Likes dati
    0

    Controllo con macro

    Buongiorno, ho inserito nel mio foglio excell questa macro che fa un controllo su due celle A3-A5, poi dalla cella A6 alla A100 c'è un menù a tendina con i vari prodotti da scegliere, vorrei se possibile che le celle dalla A6 alla A100 fossero selezionabili solo se le celle come da macro A3 e A5 fossero compilate, al contrario seguire i messaggi della macro.
    Ps. non conosco nulla di vba, mi sono limitato a cercare quello che poteva essere utile al mio lavoro.
    Grazie in anticipo.
    Roberto.

    Codice: 
    Sub CONTROLLO()
    
    '...
    Area2 = "A3"
    For Each cella In Range(Area2)
    If cella.Value = "" Then
    Application.ScreenUpdating = True
    MsgBox Prompt:="La cella " & cella.Address & " CODICE AGENZIA è vuota! ", _
    Buttons:=vbCritical, _
    Title:="Avvertimento!"
    cella.Select
    'Errore = 1
    
    Exit Sub
    End If
    Next
    '...
    '...
    
    
    '...
    Area3 = "A5"
    For Each cella In Range(Area3)
    If cella.Value = "" Then
    Application.ScreenUpdating = True
    MsgBox Prompt:="La cella " & cella.Address & " NOME AGENZIA è vuota! ", _
    Buttons:=vbCritical, _
    Title:="Avvertimento!"
    cella.Select
    'Errore = 1
    Exit Sub
    End If
    Next
    '...
    '...
    End Sub
    Ultima modifica fatta da:cromagno; 17/05/16 alle 10:06 Motivo: Inserito codice tra i tag CODE...

  2. #2

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4025
    Versione Office
    2013
    Likes ricevuti
    1228
    Likes dati
    923

    Re: Controllo con macro

    Ciao,
    per le prossime volte, ricordati di inserire i codici VBA tra gli appositi tag CODE (questa volta li metto io), leggi qui per sapere come:
    http://www.forumexcel.it/forum/2-ann...tra-i-tag-code

    Inoltre è sempre meglio allegare un file d'esempio (anche se questa volta è abbastanza semplice quello che vuoi fare). :32:

    Un codice che potresti usare (nel modulo di classe del foglio in questione):

    Codice: 
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    
    
    If Not Intersect(Target, Range("A6:A100")) Is Nothing Then
        If [A3] = "" Or [A4] = "" Or [A5] = "" Then
            MsgBox "Compilare tutti i campi nelle celle da A3 a A5!!!", vbCritical
        End If
    End If
    End Sub
    Se una delle cella A3:A5 è vuota, selezionando una cella nel range A6:A100 uscirà un messaggio di errore.

    Ti allego un file d'esempio....
    File Allegati File Allegati

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  3. #3
    L'avatar di robiome
    Clicca e Apri
    Data Registrazione
    May 2016
    Località
    Trento
    Età
    52
    Messaggi
    2
    Versione Office
    2010
    Likes ricevuti
    0
    Likes dati
    0

    Re: Controllo con macro

    Graziee, ho impiegato un pò a capire come inserire il modulo di classe, ma alla fine ci sono riuscito e funziona molto bene, grazie ancora.:166:

Discussioni Simili

  1. Macro di controllo
    Di Kiter nel forum Domande su Excel VBA e MACRO
    Risposte: 1
    Ultimo Messaggio: 18/10/16, 17:29
  2. Creare macro associata a casella di controllo
    Di pamelapa nel forum Domande su Excel VBA e MACRO
    Risposte: 44
    Ultimo Messaggio: 21/07/16, 20:49
  3. Esecuzione macro con casella di controllo flaggata
    Di G.Bove nel forum Domande su Excel VBA e MACRO
    Risposte: 16
    Ultimo Messaggio: 14/05/16, 16:03
  4. Controllo moduli - casella di controllo
    Di CRISTIAN nel forum Domande su Excel in generale
    Risposte: 8
    Ultimo Messaggio: 03/05/16, 22:55
  5. Caselle di controllo
    Di and.vall nel forum Domande su Excel VBA e MACRO
    Risposte: 19
    Ultimo Messaggio: 14/09/15, 11:33

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •