2016-04-07 11 views
-3

Ich schreibe ein Makro, um eine Datenzeile per E-Mail zu versenden, basierend auf der Benutzereingabe der ausgewählten Zeile. Was ich brauche, ist die Eingabe in die entsprechende Zellenzeile zu konvertieren. Zum Beispiel: Benutzertypen in das Eingabefeld "3", dann werden die Werte in Zeile 3 gemailt. Wenn ich den Bereich im Code manuell ausführe, funktioniert die E-Mail einwandfrei. Jede Hilfe wird geschätzt. Vielen Dank.Integer-Eingabe in entsprechende Zellenzeile konvertieren VBA

Gerade jetzt, mein Code:

myValue = InputBox("Which row are you sending?") 
ActiveSheet.Range(myValue.Rows).Select 
With ActiveSheet.MailEnvelope .Introduction = "Blah" 
    .Item.To = ActiveSheet.range("G2").Value 
    .Item.Subject = "Blah" 
    .Item.Send 
End with 
+1

Ihre Frage enthält keine Informationen darüber, wie Sie versuchen, Dinge zu tun. Fügen Sie (Teile davon) Ihren Code hinzu, um der Community zu zeigen, was Sie gerade tun und wo die Dinge nach Süden gehen. Momentan ist Ihre Frage nur zu erraten ... –

+0

** Helfen Sie uns, Ihnen zu helfen, Ihren aktuellen Code zu posten. ** –

Antwort

0

In Ihrem Mit Aussage, müssten Sie an den Körper der E-Mail den Inhalt der Zeile sie

.Item.Body = Range("A"& myValue).End(xlRight).Value 

Hope this ausgewählt hinzufügen hilft

+0

Wie kann ich diesen Bereich auf nur Spalten A-G in dieser Reihe trimmen? – Jacob

+0

Das Ende (xlRight) bringt Sie zu der äußersten rechten Zelle mit Daten darin, um den Bereich so zu ändern, dass nur A-G enthalten ist: Bereich ("A" & meinValue & ": G" & meinWert) –

+0

Ok ich verstehe. Vielen Dank. – Jacob

Verwandte Themen