Live-Forum - Die aktuellen Beiträge
Datum
Titel
15.10.2025 16:22:17
Datum ist nicht Datum :(
15.10.2025 15:02:20
Blockpfeile mit Makro gehen nicht mehr nach freigabe
15.10.2025 13:51:13
VBA - Fortschrittsbalken unabhängig von Zellen
15.10.2025 13:31:47
WENN Formel mit zwei Bedingungen über 4 Spalten...
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1264to1268
1264to1268
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Email in richtige Zeile

Forumthread: Email in richtige Zeile

Email in richtige Zeile
Tom
Hallo,
ich habe aus einem Formular ca. 1000 Zeilen kopiert. Ab Zeile 7
Nun möchte ich, dass der Name und die Emailadresse automatisch in eine Zeile gesetzt werden (siehe Beispielmappe "IST" und "SOLL")
https://www.herber.de/bbs/user/80297.xlsx
Wer hat ne Lösung?
Danke vorab
TOM
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Email in richtige Zeile
25.05.2012 10:42:44
R.Przybilla
Hallo Tom,
probier mal:
Option Explicit
Sub test() Dim Zelle As Range Dim Asht As Worksheet Set Asht = ActiveSheet With Asht For Each Zelle In .Range("B7:B" & .Cells.SpecialCells(xlCellTypeLastCell).Row) 'hier _ spalte eintragen If InStr(1, Zelle, "@", vbTextCompare) > 0 Then Zelle.Cut Zelle.Offset(-2, 1) End If Next Zelle End With End Sub Gruß Ralf
Anzeige
AW: Email in richtige Zeile
25.05.2012 11:06:13
Tom
Super vielen Dank!
hol sie Dir doch aus der (Ist)tabelle ab ...
25.05.2012 10:48:29
Matthias
Hallo
Wenn die Daten immer im gleichen Zeilenabstand stehen ist das doch mE kein Problem.
SOLL

 BC
7Mustermann 1mustermann1@mustermann.de
8  
9  
10Mustermann 2mustermann2@mustermann.de
11  
12  
13Mustermann 3mustermann3@mustermann.de
14  
15  
16Mustermann 4mustermann4@mustermann.de

Formeln der Tabelle
ZelleFormel
C7=IST!B9
C10=IST!B12
C13=IST!B15
C16=IST!B18


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Gruß Matthias
Anzeige
AW: hol sie Dir doch aus der (Ist)tabelle ab ...
25.05.2012 11:06:33
Tom
Danke auch an DIch
AW: Email in richtige Zeile
25.05.2012 11:00:55
Rudi
Hallo, 
Sub aaa()
Dim hyp As Hyperlink
For Each hyp In ActiveSheet.Hyperlinks
hyp.Parent.Cut hyp.Parent.Offset(-2, 1)
Next
End Sub

Gruß
Rudi
AW: Email in richtige Zeile
25.05.2012 11:07:00
Tom
Danke Rudi
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige