ich würde mich interessieren, ob es eine "schönere" Lösung für folgende Aufgabe gibt:
Innerhalb einer Schleife werden aus einem Bereich (B11:B18) Namen in eine Variable ausgelesen, welche als Empfänger für den Mailversand der Arbeitsmappe verwendet werden sollen. Wobei die Leerzeichen, die im Namen enthalten sind, nicht übernommen werden sollen. Im Forum habe ich nur Fragen zum Löschen von Leerezichen in Zellen gefunden, das hilft nicht, da die Zelleinträge selbst unverändert bleiben sollen.
Ich hab mir folgendes zusammengebastelt:
varCentreMgr = ThisWorkbook.Worksheets("Summary").Cells(10 + CopyFile, 2)
varPos = InStr(1, varCentreMgr, " ", vbTextCompare)
varRecipients = Left(varCentreMgr, varPos - 1) & Right(varCentreMgr, Len(varCentreMgr) - _
varPos)
Gibt es möglicher Weise eine professionellere Lösung?Viele Grüße
Gert