You are here:Home-Domande su Excel VBA e MACRO-user form a tutto schermo
user form a tutto schermo2019-03-30T16:44:31+01:00

Home Forum Domande su Excel VBA e MACRO user form a tutto schermo

Taggato: 

Visualizzazione 2 filoni di risposte
  • Autore
    Post
    • Avatarteto21162
      Partecipante
        Post totali: 88

        Salve Ragazzi,

        per evitare l’antiestetico sfarfallio e passaggio di file visivo preferisco coprire il foglio con l’apertura di un form a tutto schermo al quale ho abbinato una immagine.

        Il codice usato è questo ed è inserito nell’activate del form

        ————————————————————————

        CuH = STAMPA.Height      ‘dimensioni iniziali

        CuW = STAMPA.Width

        ‘Resize Form

        STAMPA.Top = Application.Top

        STAMPA.Left = Application.Left

        STAMPA.Width = Application.Width

        STAMPA.Height = Application.Height

        ‘Resize contenuto

        ZoW = STAMPA.Width / CuW        ‘calcola zoom

        ZoH = STAMPA.Height / CuH

        If ZoW < ZoH Then RZoom = ZoW Else RZoom = ZoH

        STAMPA.Zoom = RZoom * 100

        ——————————————————————-

        sotto al codice che gestisce il form a tutto schermo altri codici.

        Il tutto parte cliccando un pulsante al quale è abbinato questa macro:

        —————————————————————————-

        Sub Avvio_stampa_2()

        controllo = MsgBox(“SE VUOI STAMPARE PREMI SI ?”, vbYesNo)

        If controllo = vbYes Then

        STAMPA.Show

        MAPPA.Show

        End If

        End Sub

        ———————————————————————————

        appena clicco il pulsante il form va a tutto schermo ma senza l’immagine abbinata, ci vuole alcuni secondi prima che l’immagine appaia quindi rallentando una procedura che è già complessa e lunga. Si può fare qualcosa?

        Grazie a tutti

        Teto :bye:

      • BySalvBySalv
        Amministratore del forum
          Post totali: 693

          Ciao Teto, un file d’esempio è la migliore delle risposte.
          a volte dipende anche dal tipo di immagine che deve caricare.
          anche se non credo che un userform a tutto schermo sia la soluzione migliore un esempio.

          Cattura

          Ciao By Sal :bye:

          Ciao By Sal (8-)
          se ti piace la soluzione aiuta a sostenere il Forum con una DONAZIONE a piacere, Grazie

        • Avatarteto21162
          Partecipante
            Post totali: 88

            Ciao By Sal

            eccoti l’esempio excel

            <br />

            e un mini video che ti mostra quello che succede e i tempi tra l’apertuta del form e l’apparizione della sua immagine
            teto :bye:
            • Questa risposta è stata modificata 1 anno, 2 mesi fa da Avatarteto21162.
            • Questa risposta è stata modificata 1 anno, 2 mesi fa da Avatarteto21162.
        Visualizzazione 2 filoni di risposte
        • Devi essere connesso per rispondere a questo topic.