Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 08:56:18
Textbox in Tabellenblatt ohne Bestätigung in Zelle eintragen
20.04.2024 07:57:54
Tablle fürs E-Auto - Preis wenn kürzer als 60 Min Ladezeit
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
328to332
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
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 Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

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

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

305 Forumthreads zu ähnlichen 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
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
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
Anzeige
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
Zählen wie oft ein Inhalt in der Zelle vorkommt
Sophie

Hallo Leute,
also ich habe in Spalte A 6 stellige Zahlen z.B. 925938.
Ich möchte nun Zählen, wie oft eine Zhal vorkommt, und falls doppelte vorkommen soll die Zahl nur noch 1x in Spalte A stehen.
Ist das irgendwie verständlich?
Liebe Grüße
Sophie
27.05.2010 13:02:39
Thread-ID: 1159068
8 Beiträge
Bestimmte Anzahl Zellen aus Zeilen in Spalten kopi
Ralf

Hallo miteinander,
ich habe hier eine Tabelle mit mehreren Hunderttausend Codes in Spalte A.
Ich brauche allerdings immer 80 Codes (kann beim nächsten mal ein anderer Wert sein) in einer Zeile.
Es müsste quasi A2 in B1, A3 in C1, A4 in D1 usw. kopiert werden. Dann wäre für mich ja v...
30.07.2010 12:33:26
Thread-ID: 1169657
4 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

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
4
4
2
8
7
11
7
3
4
5
5
1
3
10
2
8
5
3
8
4
7
4
2
3