Registriert seit: 05.08.2014
Version(en): 2013
Hallo liebe Leute,
mit den Funktionen Replace oder Substitute kann ich in meinen Excel Tabellen
gezielt Zeichen ersetzen und verändern. Ich möchte nun Text der in meinen Excelzellen
in Klammern steht, sammt Klammern per VBA löschen.
Wie kriege ich das hin?
Danke für eure Bemühungen
Registriert seit: 17.04.2014
Version(en): MS Office 365(32)
Hallo Christa,
mit dem Makrorekorder aufgezeichnet:
Code:
Sub Makro1()
Selection.Replace What:="(*)", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End Sub
Gruß Uwe
Folgende(r) 1 Nutzer sagt Danke an Kuwer für diesen Beitrag:1 Nutzer sagt Danke an Kuwer für diesen Beitrag 28
• ChristaRohn
Registriert seit: 05.08.2014
Version(en): 2013
Hallo Uwe,
vielen Dank für die schnelle Hilfe. Super!
Registriert seit: 25.09.2014
Version(en): 2010-2013
Hi Leute,
ich habe ein ähnliches Problem. Bei mir liegen Zellinhalte in der folgenden Form vor:
00001 Text1
00002 Text2
00003 Text3
00004 Text4
usw.
Wie schaffe ich es mit der Replace Funktion, das hinterher in meinen Zellen nur noch folgendes steht:
Text1
Text2
Text3
Text4
usw.
Registriert seit: 11.04.2014
Version(en): Office 2007
Hallo,
poste ich mal mein Formel-Konstrukt
Arbeitsblatt mit dem Namen 'Tabelle1' |
| A | B |
1 | 00001 Text1 | Text1 |
2 | 00002 Text2 | Text2 |
3 | 00003 Text3 | Text3 |
4 | 00004 Text4 | Text4 |
Zelle | Formel |
B1 | =TEIL(A1;SUCHEN(" ";A1)+1;LÄNGE(A1)) |
B2 | =TEIL(A2;SUCHEN(" ";A2)+1;LÄNGE(A2)) |
B3 | =TEIL(A3;SUCHEN(" ";A3)+1;LÄNGE(A3)) |
B4 | =TEIL(A4;SUCHEN(" ";A4)+1;LÄNGE(A4)) |
Diese Tabelle wurde mit Tab2Html (v2.4.1) erstellt. ©Gerd alias Bamberg |
Gruß Stefan
Win 10 / Office 2016
Registriert seit: 11.04.2014
Version(en): Office 2003 - Office 2007 - Office 365
Hallo,
schon einmal an "Text in Spalten" gedacht? In Excel 2003 gab es das unter dem Menüpunkt "Daten".
Gruß
Marcus
Wissen ist Macht - es ist aber nicht schlimm nicht alles zu wissen.
Man muss nicht alles wissen - man muss nur wissen wo es steht, oder wo man Hilfe bekommt.
Registriert seit: 10.04.2014
Version(en): 2016 + 365
(27.09.2014, 09:59)marose67 schrieb: schon einmal an "Text in Spalten" gedacht? In Excel 2003 gab es das unter dem Menüpunkt "Daten".
das war auch mein erster Gedanke.
In 2010 und 2013 ist das immer noch dort.
Registriert seit: 25.09.2014
Version(en): 2010-2013
Hallo Leute,
ja Text in Spalten das war auch meine Idee. Kann man auch leicht verwirklichen.
Möchte ich im Rahmen einer anderen Aufgabe auch später im Forum zeigen.
Aber jetzt gehts mir wirklich wie man so etwas mit Replace machen könnte.
Kennt jemand sich mit regulären Ausdrücken aus? - Wäre ein Stichwort.
Aber Danke schon mal für eure Anregungen.
Registriert seit: 17.04.2014
Version(en): MS Office 365(32)
Hallo Wulfi,
wenn das Leerzeichen das einzige ist, einfach nach 5 Zeichen mit anschließendem Leerzeichen
suchen und durch nichts ersetzen.
Code:
.Replace What:="????? ", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Gruß Uwe
Registriert seit: 17.04.2014
Version(en): MS Office 365(32)
Hallo Wulfi,
oder beliebig viele Zeichen mit anschließendem Leerzeichen durch nichts ersetzen:
Code:
.Replace What:="* ", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Gruß Uwe