Come copiare l'immagine dal foglio di lavoro al modulo utente in Excel?
Questo articolo ti mostrerà i metodi per copiare un'immagine dal foglio di lavoro attivo a Userform in Excel.
Copia l'immagine dal foglio di lavoro a Userform con copia e incolla
Copia l'immagine dal foglio di lavoro a Userform con codice VBA
Copia l'immagine dal foglio di lavoro a Userform con copia e incolla
Si prega di fare quanto segue per copiare un'immagine dal foglio di lavoro a Userform.
1. Passare al foglio di lavoro contiene l'immagine che è necessario copiare in Userform, quindi premere il tasto altro + F11 chiavi insieme per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Nel Microsoft Visual Basic, Applications Edition finestra, fare clic inserire > Modulo utente. Vedi screenshot:
3. Ora inserisci un controllo immagine in UserForm. Fare clic su Immagine nel pulsante Strumenti finestra di dialogo, quindi disegnare un controllo immagine nel file Modulo utente manualmente. Vedi screenshot:
4. Fare clic con il pulsante destro del controllo Immagine inserito e fare clic Properties dal menu contestuale come mostrato nell'immagine sottostante:
5. Quindi puoi vedere un file Properties il riquadro viene visualizzato sul lato sinistro del file Microsoft Visual Basic, Applications Edition finestra.
6. Tornare al foglio di lavoro e selezionare l'immagine che si desidera visualizzare nel modulo utente, quindi copiare l'immagine premendo Ctrl + C chiavi.
7. Entra nel Microsoft Visual Basic, Applications Edition di nuovo, scorri verso il basso per fare clic su Immagine campo e quindi incolla il nome dell'immagine copiata al suo interno nella scheda Alfabetico.
Ora l'immagine nel foglio di lavoro viene copiata nel modulo utente.
Copia l'immagine dal foglio di lavoro a Userform con codice VBA
Questa sezione ti mostrerà una soluzione alternativa per copiare più immagini dal foglio di lavoro a un modulo utente, quindi visualizzare l'immagine corrispondente nel modulo utente selezionando il nome dell'immagine da una casella combinata. Si prega di fare quanto segue.
1. Si prega di seguire i passaggi precedenti 1 e 2 per inserire un modulo utente nel foglio di lavoro.
2. Quindi inserire a Controllo frame in UserFrom come mostrato nell'immagine sottostante:
3. Fare clic con il pulsante destro del mouse sulla cornice inserita e selezionare Properties dal menu contestuale. Sulla sinistra Properties riquadro, selezionare Falso dal Visibile campo. Vedi screenshot:
4. Inserire più controlli Immagine nel Frame come mostrato nell'immagine sottostante.
5. Tornare al foglio di lavoro e selezionare l'immagine che si desidera visualizzare nel modulo utente, quindi premere il tasto Ctrl + C chiavi per copiarlo.
6. Entra nel Microsoft Visual Basic, Applications Edition finestra, fare clic con il pulsante destro del mouse sul primo controllo immagine e selezionare Properties dal menu di scelta rapida. Vedi screenshot mostrato.
7. Nel Properties riquadro, fare clic su Immagine campo, quindi premere il pulsante Ctrl + V per incollare l'immagine copiata al passaggio 5, quindi selezionare 1 - fmPictureSizeModeStrtch dal Modalità dimensione immagine elenco a discesa come mostrato nell'immagine sottostante.
8. Ripetere i passaggi 5 - 7 per incollare altre immagini dal foglio di lavoro ai controlli Immagine a sinistra nell'UserForm. E il risultato verrà visualizzato come mostrato nell'immagine sottostante.
9. Spostare il file Telaio controllo nell'angolo di UserForm, quindi inserire un nuovo Immagine controllo e a Casella combinata controllo in UserForm. Vedi screenshot:
10. Fare clic con il pulsante destro del mouse su Modulo utente, Quindi fare clic Visualizza codice. Quindi copia e incolla sotto il codice VBA per sostituire quello originale nella finestra del codice.
Codice VBA1: copia l'immagine dal foglio di lavoro a Userform
Private Sub ComboBox1_Change()
UserForm1.Controls.Item("Image4").Picture = UserForm1.Controls.Item(UserForm1.ComboBox1.Value).Picture
End Sub
Private Sub UserForm_Initialize()
Dim xImg As Control
On Error Resume Next
For Each xImg In UserForm1.Controls
If TypeName(xImg) = "Image" And xImg.Name <> "Image4" Then
UserForm1.ComboBox1.AddItem xImg.Name
End If
Next
End Sub
Note:: Nel codice, Modulo utente1 è il nome dell'UserForm inserito, Image4 è il nome del controllo Immagine all'interno del quale verranno visualizzate le immagini. E Immagine rappresenta tutti i controlli Immagine che contengono le immagini che hai copiato dal foglio di lavoro. ComboBox1 è il nome della casella combinata che hai inserito nel form utente. Si prega di cambiarli con i propri.
11. Chiudi il Microsoft Visual Basic, Applications Edition finestra.
12. Inserire un pulsante di comando nel foglio di lavoro facendo clic su Costruttori > inserire > Pulsante di comando (controllo ActiveX).
13. Fare clic con il pulsante destro del pulsante di comando e selezionare Visualizza codice dal menu contestuale. Quindi copia e incolla il codice VBA sottostante nella finestra del codice. E infine chiudi la finestra.
Codice VBA2: copia l'immagine dal foglio di lavoro a Userform
Private Sub CommandButton1_Click()
UserForm1.Show
End Sub
15. Clic Costruttori > Modalità di progettazione per disattivare la modalità di progettazione.
D'ora in poi, quando si fa clic sul pulsante di comando, verrà visualizzato UserForm. È possibile visualizzare l'immagine selezionando il nome dell'immagine dalla casella combinata. Vedi screenshot:
Seleziona nomi diversi dalla casella combinata per visualizzare immagini diverse nel Form utente.
Articoli Correlati:
- Come centrare un'immagine in una cella di Excel?
- Come verificare se una cella contiene un'immagine in Excel?
- Come inserire un'immagine o un'immagine dinamicamente nella cella in base al valore della cella in Excel?
- Come ingrandire l'immagine quando si fa clic su di essa in Excel?
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!