Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.10.2025 10:29:26
Userform Multipage - Page auswählen
19.10.2025 21:57:06
Diagrammpunkte in unterschiedlichen Farben je nach Wert
19.10.2025 18:21:56
Prüfen, ob Bild geladen wurde
19.10.2025 15:24:14
VBA -Drucken nur, wenn ich mit bestimmtem WLAN verbunden bin
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
328to332
328to332
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zahlen verschieben in Spalte B

Forumthread: Zahlen verschieben in Spalte B

Zahlen verschieben in Spalte B
01.11.2003 21:54:26
Silke
Hallo,
ich habe eine kleine Frage, in meine Spalte A habe ich die Verzeichnisnamen einer CD mittels Makro eingelesen, da die Verzeichnisnamen aus je einen oder mehreren Namen und einer Zahl bestehen wollte ich jetzt die Zahlen in Spalte B schreiben
Beispiel A B
abcd 333 soll werden abcd 333
avc djd 22 avc djd 22

und so weiter und so fort
kann mir da jemand helfen ?

Gruss
Silke

Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zahlen verschieben in Spalte B
01.11.2003 22:05:00
PeterW
Hallo Silke,

lass folgendes Makro laufen:

Sub ZahlenTrennen()
Dim lgZeile As Long
Dim intStellen As Integer
Dim strName As String
Dim strZahl As String
For lgZeile = 1 To Range("A65536").End(xlUp).Row
For intStellen = 1 To Len(Cells(lgZeile, 1))
If Not IsNumeric(Mid(Cells(lgZeile, 1), intStellen, 1)) Then
strName = strName & Mid(Cells(lgZeile, 1), intStellen, 1)
Else
strZahl = strZahl & Mid(Cells(lgZeile, 1), intStellen, 1)
End If
Next
Cells(lgZeile, 1) = strName
Cells(lgZeile, 2) = strZahl
strName = ""
strZahl = ""
Next
End Sub

Gruß
Peter
Anzeige
Vielen Dank- oT
01.11.2003 22:25:58
Silke
Noch eine Variante...
01.11.2003 22:13:52
Ramses
Hallo

Kopiere den Code in Modul deiner Mappe


Option Explicit

Function GetNumber(myR As Range) As Double
Dim i As Integer
For i = 1 To Len(myR.Value)
    Debug.Print i
    Debug.Print Mid(myR.Value, i, 1)
    If IsNumeric(Mid(myR.Value, i, 1)) Then
        Debug.Print "Definitv: " & Right(myR.Value, Len(myR.Value) - (i - 1))
        GetNumber = Right(myR.Value, Len(myR.Value) - (i - 1))
        Exit Function
    End If
Next i
End Function
 
     Code eingefügt mit Syntaxhighlighter 1.16



Dann kannst du ihn in der Tabelle so verwenden.

Gruss Rainer

Anzeige
Vielen Dank -oT
01.11.2003 22:24:24
Silke
AW: Zahlen verschieben in Spalte B - ohne VBA
01.11.2003 22:40:27
FP
Hallo Silke,

... geht es auch (Arrayformel)

Excel Jeanie HTML
Anzeige
AW: Zahlen in B - ohne VBA - ohne Array
01.11.2003 22:54:31
FP
Hallo Silke,

... geht es auch, siehe Beispiel :-)

Excel Jeanie HTML
Anzeige
Danke werde ich ausprobieren - oT
01.11.2003 23:50:12
Silke
;

Forumthreads zu verwandten Themen

Anzahl unterschiedl. Werte in Spalte zählen
Jakob

Hallo,
ein ähnliches Problem wurde hier im Forum schon einmal diskutiert. (https://www.herber.de/forum/archiv/632to636/t635773.htm)
Meine Problem:
Wie kann ich die Anzahl unterschiedlicher Einträge/Werte einer Spalte erhalten, ohne dass diese vorgegeben werden ( also ohne die Verwe...
14.08.2008 18:16:11
Thread-ID: 1001934
2 Beiträge
Anzahl gleicher Elemente einer Spalte
Pascal

Hallo,
wie kann ich die Anzahl der gleichen elemente in einer Spalte ermitteln?
die Tabelle sieht etwa so aus:
1
3
0
1
1
2
0
1
das ergebis soll dieses sein:
0: 2
1: 4
2: 1
3: 1
03.11.2008 08:35:37
Thread-ID: 1021264
5 Beiträge
Anzeige
Anzahl identischer Einträge in 2 Spalten ermitteln
Christian

Hallo zusammen,
ich möchte die Anzahl identischer Werte in zwei spalten ermitteln.
Die erste Spalte enthält eindeutige Werte (Artikelnummern).
Die zweite Spalte enthält eine Teilmenge der ersten Spalte (Bestimmte Artikel, die beobachtet werden sollen).
Im Übersichtsichtsbereic...
11.06.2009 14:56:03
Thread-ID: 1080747
5 Beiträge
Anzeige
Wörter in Zellen / Spalteninhalte zählen
Lemmi

Hallo zusammen,
ich möchte gerne feststellen wieviel gleiche Wörter/ Zahlen sich wiederholen!
Ich habe eine Spalte mit nachfolgenden Inhalt:
Zellen ab E6
E6: Müller Fritz 123
E7: Meier Hans 456
E8: Kleiner Hund 123
E9 Müller Hans123
E10:123
E11: 456
Es s...
27.09.2009 09:04:35
Thread-ID: 1105727
3 Beiträge
Anzahl Zellen in Spalte dividiern durch Zahl
edie

Hallo zusammen,
die Spalte A mit Zahlen ist variabel lang, nun hätte ich gerne, dass die Anzahl der belegten
Zellen in Spalte A dividiert wird durch die Zahl in der Zelle C1 und in die Spalte B wird einfach eine 1 bzw. 2 u.s eingetragen.
Hier das Beispiel:
Spalte A...
14.12.2009 22:22:47
Thread-ID: 1123927
9 Beiträge
Anzahl Text in Spalte H zählen
Wolfgang

Hallo,
in Tabelle "Start" befindet sich in Zelle B34 ein Text und Zelle B35, die Texte kommen in Kombination "B34" & " " & "B35" in Tabelle "Daten" Spalte H entsprechend vor. Ich würde gerne die Anzahl dieser Textkombination in Zelle (z.B.) C35 angzeigt bekommen. Allerdings soll dab...
24.02.2010 21:38:53
Thread-ID: 1141280
8 Beiträge
Anzahl von Textwerten in Spalte mit VBA
Textwerten

Hallo Forum,
ich muss aus einer (sehr) langen Liste von unterschiedlichen Text-Werten die Anzahl der einzigartigen Vorkommen ermitteln. Und zwar mit VBA.
Das sieht in etwa wie folgt aus:
AA
BB
CC
AA
AA
BB
Das Ergebnis wäre simple und einfach: 3
Es funktio...
27.04.2010 17:21:49
Thread-ID: 1154135
12 Beiträge
Passwort zum Einblenden und Bearbeite von Spalten
Spalten

Hallo zusammen,
ich benötige eure Hilfe!!!
Ich brauche ein Makro, welches mir z.B. die Spalte C und D nur durch ein Passwort anzeigt und ich es bearbeiten kann.
Oder dass ich die Benutzer definiere die die Spalte C und D sehen und bearbeiten dürfen.
Ich hoffe mir kann da jemand...
20.09.2010 21:23:40
Thread-ID: 1178637
5 Beiträge
Anzeige
Schleife für Anzahl an Zeilen in einer Spalte
KibbA

Hi,
ich komme vor lauter bäumen nicht auf den wald:
ich brauche eine schleife, der für jede Zeile in einer bestimmten spalte, etwas durchführt und dabei den wert(inhalt) in ein anderes feld schreibt.
mein ansatz:
For Each Row in Sheets("Tab1").Columns("A:A")
SpalteC = Spal...
12.10.2010 11:38:46
Thread-ID: 1181897
6 Beiträge
Anzahl der Zeilen innerhalb einer Spalte
Klaus

Hallo Forum,mit welcher Formel bekomme ich in Excel die Anzahl der Zeilen
in einer Spalte angezeigt?BsP
A1 01EZ0201
B1 01EM9999
C1 01ZZ9805Das Ergebnis in D1 müsste dann 3 ergeben.
Danke
Klaus
23.05.2002 12:25:24
Thread-ID: 123053
2 Beiträge
Anzahl der Werte in einer Spalte
christian

Hallo alle zusammen,
kann man sich per Formel ausgeben lassen, wieviele unterschiedliche Werte es in Spalte A gibt? Die Tabelle ist nach Spalte A sortiert.
Bislang hab ich mir mit den Formeln D1=1 D2=WENN(A1=A2;D1;D1+1) weitergeholfen aber das sind bei der Größe der Tabelle Tausende, ev...
31.07.2011 17:11:11
Thread-ID: 1224369
4 Beiträge
Anzeige
Spalteninhalt abh. von Wortendung und anderer Zell
Wortendung

Hallo,
ich habe folgendes Problem.
RS00543 Ring, Onyx
RS00543-16 Ring, Onyx
RS00543-17 Ring, Onyx
RS00543-18 Ring, Onyx
RS00543-19 Ring, Onyx
RS00543-20 Ring, Onyx
In der ersten Spalte meiner Tabelle stehen Artikelnummern.
Wenn es sich um einen...
14.10.2011 22:31:43
Thread-ID: 1233521
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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