Das # vor Städtebegriffe stellen - Liste ist aber ohne # schon vorhanden

[Udo-B]

Hallo,
Hilferuf von einem ü70er 
ich - Baujahr 1948   frage mal einfach.

Ich habe eine Liste mit 200 Städte ohne dieses #
Benötige aber das # vor jedem Städtenamen,
Alles manuell eingeben ist doch schon viel Arbeit 
Gibt es eine Formel wie man das anders machen kann.

Meine Tochter die sich, auch beruflich, gut auskennt, ist aber auch ratlos.
 Danke sage ich schon mal aus Schwelm 

[BoskoBiati]

Hi,

bin zwar noch etwas unter 75, aber trotzdem mal ein Ansatz:

mit Formeln:

in die Spalte rechts daneben (notfalls eine einfügen)

Code:

="#"&wechseln(a1;"#";"")

danach Spalte kopieren, Inhalte einfügen, Werte
Ursprungsspalte löschen.

Mit VBA:

Code:

Sub test()
Dim loA As Long
Dim loB As Long
Dim rng As Range
Dim Zelle As Range
loA = Cells(Rows.Count, 1).End(xlUp).Row
Set rng = Range("A1:A" & loA)
For Each Zelle In rng
Zelle = "#" & Replace(Zelle, "#", "")
Next

End Sub

Wenn Du das nicht einbauen kannst, kann Dir sicher Deine Tochter helfen.

[HKindler]

Hi,

ich hab's genau andersrum verstanden: Es gibt noch kein # und es soll eingefügt werden...

="#"&A1

bzw. falls ab und zu doch schon ein # vorhanden ist:

=WENN(LINKS(A1,1)="#";A1;"#"&A1)

Formel jeweils runter ziehen.
Danach kopieren und als Werte einfügen.

EDIT:
Man sollte genauer lesen. Edgar und ich haben beide dasselbe verstanden. Nur habe ich Edgars Beitrag beim Überfliegen falsch verstanden (bzw. die Formel nicht richtig angeschaut). Ich lass meine Formeln trotzdem mal stehen.

[Oberon]

Hi,

ich finde, dass ist ein gutes Beispiel für die Blitzvorschau.

Wenn die Daten in A1 beginnen in B1 "#Aachen" eintragen -> Enter -> STRG + e

Falls es schon Einträge mit "#" am Anfang gibt, dann Spalte B anschließend markieren, STRG + H drücken und "##" durch "#" ersetzen.

CU
Oberon

[snb]

In VBA:

Code:

sub M_snb()
  sn=sheet1.columns(1).specialcells(2)

  for j=1 to ubound(sn)
    sn(j,1)="#" & sn(j,1)
  next

  sheet1.columns(1).specialcalls(2)=sn
End Sub

Aber auch für 70+ gilt immer die Frage

Benötige aber das # vor jedem Städtenamen,

Warum ?, wozu ? Das sollte immer nur eine Zwischenstufe sein....

[TxM]

Also, ich weiß nicht, ob ich hier irgend etwas übersehe aber eigentlich geht es doch ziemlich einfach, wofür muss man da mit VBA arbeiten?

Wenn die Städe z.B. in Spalte A stehen, schreibt man in Spalte B einen Code wie im Beispiel und zieht den einfach runter, bis man das auf alle Städte angewendet hat.