Excel e gli applicativi Microsoft Office Sfida numero 4: MsgBox senza If

Login Registrati
Stai vedendo 11 articoli - dal 26 a 36 (di 36 totali)
  • Autore
    Articoli
  • #14671 Score: 0 | Risposta

    Mirko
    Partecipante
      2 pts

      Ciao

      Seleziona la scheda di un foglio, poi inserisci Finestra di dialogo

      Per visualizzare la mia finestra esegui:

      `Sub Visualizza_Finestra()
        ActiveWorkbook.DialogSheets("Finestra di dialogo1").Visible = True
      End Sub`
      #14674 Score: 0 | Risposta

      Luca73
      Partecipante
        54 pts

        OK Grazie

        #14675 Score: 0 | Risposta

        vecchio frac
        Senior Moderator
          238 pts

          Oh ma da quanto tempo non vedevo un foglio macro!

          @luca: su una tab di un file Excel aperto, es Foglio1, tasto destro, Inserisci, poi "Finestra di dialogo Excel 5"

          #14676 Score: 0 | Risposta

          vecchio frac
          Senior Moderator
            238 pts

            Non avevo visto la seconda pagina del thread, scusate 🙂

            #14678 Score: 0 | Risposta

            Mirko
            Partecipante
              2 pts

              Ciao allora sostituirei il msgbox con:

              Application.Assistant.DoAlert

              Rem Application.Assistant.DoAlert
              Rem On answer GoSub
              Sub self_destruction_16()
                  Dim answer As Long
                  answer = Application.Assistant.DoAlert("Attenzione", "Vuoi formattare il disco C: ?", _
                  vbOKCancel, 0, msoAlertDefaultFirst, msoAlertCancelDefault, False)
                  On answer GoSub Sub1, Sub2 ' Execution resumes here after
                  Exit Sub
              Sub1:
                  MsgBox "Boom!": Return
              Sub2:
                  Return
              End Sub

              h t t p s://docs.microsoft.com/en-us/dotnet/api/microsoft.office.core.assistant.doalert?view=office-pia

              #14679 Score: 0 | Risposta

              vecchio frac
              Senior Moderator
                238 pts

                Mirko, ma come ti vengono?   

                #14681 Score: 0 | Risposta

                vecchio frac
                Senior Moderator
                  238 pts

                  Allora via! Il televoto è aperto! Se non ho sbagliato le impostazioni, si possono esprimere tre preferenze.

                  Chiusura delle votazioni fra tre giorni, venerdì 5 aprile ore 20! Votate numerosi   

                  #14811 Score: 0 | Risposta

                  vecchio frac
                  Senior Moderator
                    238 pts

                    Stop al televoto! E il vincitore è...

                    M  A  R  I  U  S  4  4 

                    Congratulazioni al vincitore!

                    E una coccarda     

                    E complimenti a tutti gli altri!!!

                    #14814 Score: 0 | Risposta

                    Marius44
                    Moderatore
                      51 pts

                      Buongiorno a tutti

                      Ragazzi, mi fate arrossire   

                      Son contento per aver conseguito la coccarda ma, tra tanti Guru, come ho fatto ad arrivare primo?

                      Non è che la nostra piattaforma e ... manipolabile (insinua qualcuno) "come la Rousseau"?

                      Comunque, grazie e ... me la tengo stretta.

                      Ciao,

                      Mario

                      #14818 Score: 0 | Risposta

                      Anonimo
                        1 pt

                        Anch'io sono di quelli che ha votato Marius44.  

                        L'ho votato perché (senza nulla a togliere agli altri) mi è piaciuta la sua semplicità, immediatezza ed estrema leggibilità del codice.

                        Però davvero complimenti a tutti per la grande creatività dimostrata.  

                         

                         

                        #14820 Score: 0 | Risposta

                        vecchio frac
                        Senior Moderator
                          238 pts

                          Grazie Leonardo... alla prossima Sfida parteciperai attivamente   

                        Login Registrati
                        Stai vedendo 11 articoli - dal 26 a 36 (di 36 totali)
                        Rispondi a: Sfida numero 4: MsgBox senza If
                        Gli allegati sono permessi solo ad utenti REGISTRATI
                        Le tue informazioni: