lancio di Excel e fare clic sulla scheda " sviluppatori" . Fare clic su " Visual Basic " per aprire la finestra di Microsoft Visual Basic . Fai clic sul menu "Strumenti " e clicca su "Riferimenti ". Scorrere verso il basso della casella di riepilogo e selezionare la casella accanto a " numero> Libreria oggetti di Microsoft Outlook   2 Fare clic sul menu "Inserisci" e fare clic su "Modulo" per inserire un nuovo modulo di codice . Digitare quanto segue per creare una nuova procedura per l'invio e-mail :   Sub sendEmail ( ) per   On Error GoTo Err_sendEmail :   digitare quanto segue per dichiarare le variabili :   Dim oLookApp Come Outlook.Application   Dim oLookMail Come Outlook.MailItem   Dim dataToSend As String   Tipo l' seguendo per creare gli oggetti di Outlook :   oLookApp = New Outlook.Application   oLookMail = oLookApp.CreateItem ( 0 ) economici 5   digitare quanto segue per aggiungere due righe di dati : .   Range ( "A1" ) Selezionare   ActiveCell.Value = "Test 1 dati "   Range (" A2 " ) Select < br . >   ActiveCell.Value = "Test 2 dati "   digitare quanto segue per salvare i dati in una variabile stringa : .   Range (" A1 " ) Selezionare < . br   dataToSend = ActiveCell.Value   Gamma > ( " A2 ") Selezionare   dataToSend = " Riga 1 : " & dataToSend & " .... Riga 2 : " & ActiveCell.Value   digitare quanto segue per definire le informazioni e-mail e inviarlo: .   oLookMail   Per = " [email protected] "   . Oggetto = "Email Excel"   . del corpo = dataToSend   . inviare   End With   Modifica l' indirizzo email e immettere un indirizzo e-mail di lavoro   digitare quanto segue per terminare la procedura e catturare eventuali errori : .   Exit_sendEmail :   Exit Sub 
              
 
 3 
 
 
 
 4 
 
 
 
 
 
 6 
 
 
 
 7 
 
 
 
 
 
 
 
 8 
 
 Informazioni correlate
                  
software © www.354353.com