Thema Datum  Von Nutzer Rating
Antwort
Rot E-Mail mit Zellinhalten - Leerzellen weglassen
10.08.2015 10:46:09 Roman
NotSolved
10.08.2015 10:47:52 Gast4332
NotSolved

Ansicht des Beitrags:
Von:
Roman
Datum:
10.08.2015 10:46:09
Views:
1107
Rating: Antwort:
  Ja
Thema:
E-Mail mit Zellinhalten - Leerzellen weglassen
Guten Tag, ich bin gerade dabei einen "Bestellkatalog" für den Firmenaußendienst zu erstellen. Über einen Bestellbutton soll der Text aus einer Spalte in den E-Mail-Body eingefügt werden. Das klappt auch ganz gut nur weiß ich nicht wie ich es bewerkstellige nur befüllte zellen einzufügen. So wie es jetzt ist entstehen da zum Teil große Lücken und das sieht nicht hübsch aus. So sieht der Code jetzt mal aus: Private Sub CommandButton1_Click() Dim bereich As Range, a, z, s, zeile, gesamt, alles Set bereich = Range("J8:J100") For Each a In bereich.Areas For z = 1 To a.Rows.Count For s = 1 To a.Columns.Count zeile = zeile & " " & a.Cells(z, s) Next gesamt = gesamt & vbCrLf & zeile zeile = "" Next alles = alles & vbCrLf & gesamt gesamt = "" Next Dim Nachricht As Object, OutApp As Object Set OutApp = CreateObject("Outlook.Application") Set Nachricht = OutApp.CreateItem(0) With Nachricht .To = "xxx@xxx.com" .cc = "xxx@xxx.com" .Subject = "Materialbestellung " & Date .Body = "Materialbestellung " & Range("B1").Value & vbCrLf & "Kommentar: " & Range("B3").Value & alles .Display End With Set OutApp = Nothing Set Nachricht = Nothing End Sub Danke schonmal für die Hilfe. beste Grüße Roman

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot E-Mail mit Zellinhalten - Leerzellen weglassen
10.08.2015 10:46:09 Roman
NotSolved
10.08.2015 10:47:52 Gast4332
NotSolved