Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Spalte prüfen und evtl. ergänzen; VBA

Spalte prüfen und evtl. ergänzen; VBA
24.04.2015 07:59:06
Walter
Guten Morgen,
habe folgende Bitte/Problem:
Bräuchte gerne über VBA einen Kode für folgendes:
In einer vorher markierten Spalte
soll geprüft werden, ob bei Zahlen (und nur bei Zahlen!)
Einträge stehen, welche kein Devis (-) davor stehen haben.
Diese (nur bei Zahlen!) müssten mit einem Devis (-) ergänzt werden.
Folgende Werte (bis zu 45000 Werte) können in dieser Spalte stehen:
-12
- 3
a
44b
79
Z
55
Krumme Weiden
usw.
Ergebnis wäre:
-12
-3
a
-44b
-79
Z
-55
Für eure Hilfe wäre ich sehr dankbar.
L.g.
Walter

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spalte prüfen und evtl. ergänzen; VBA
24.04.2015 08:07:46
Matthias
Hallo
Option Explicit
Sub walter()
Dim RnG As Range
For Each RnG In Selection
If IsNumeric(Left(RnG, 1)) Then
RnG = "-" & RnG
End If
Next
End Sub
Gruß Matthias

AW: Spalte prüfen und evtl. ergänzen; VBA
24.04.2015 08:12:59
Walter
Vielen Dank.
Sorry. 1 mal zu gepostet...

AW: Spalte prüfen und evtl. ergänzen; VBA
24.04.2015 08:31:02
Walter
Hallo Matthias.
Funktioniert ggaaannnzzz toll.
Danke.
Walter

Anzeige
Danke für die Rückmeldung :-) owT
24.04.2015 08:40:52
Matthias

Forumthreads zu verwandten Themen

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige