Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
536to540
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
536to540
536to540
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Mit VBA ein Ergebniss aufteilen...

Mit VBA ein Ergebniss aufteilen...
28.12.2004 21:59:25
Sonnenpeter
Hallo zusammen,
ich würde gerne mit VBA die nachfolgenden ziffern auslesen.
$A$2:$L$33
Als Ergebnis brauche ich $A$2 und $L$33 / könnte auch $AB$2 und $AL$33 oder $AB$222 und $AL$3345
Wie mache ich das am geschicktesten?
Gruß / Sonnenpeter

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Mit VBA ein Ergebniss aufteilen...
28.12.2004 22:09:27
Hajo_Zi
Hallo Peter
Option Explicit

Sub test()
Dim StWert As String
StWert = "$A$2:$L$33"
MsgBox Left(StWert, (InStr(1, StWert, ":") - 1)) & " und " & _
Right(StWert, Len(StWert) - InStr(1, StWert, ":"))
End Sub

Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.


Danke Hajo
28.12.2004 22:15:35
Sonnenpeter
Danke Hajo,
es funktioniert.
Gruß Sonnenpeter
AW: Mit VBA ein Ergebniss aufteilen...
PeterW
Hallo,
benutze Instr und finde im String den Doppelpunkt.
Zum "Basteln" ein Code, der die erste und letzte Zelle eines gewählten Bereiches liefert:

Sub AdressenAuslesen()
Dim str As String
Dim strAnfang As String, strEnde As String
str = Selection.Address
If InStr(1, str, ":") = 0 Then
MsgBox "nur eine Zelle ausgewählt!"
Exit Sub
End If
strAnfang = Left(str, InStr(1, str, ":") - 1)
strEnde = Right(str, Len(str) - InStr(1, str, ":"))
MsgBox strAnfang
MsgBox strEnde
End Sub

Gruß
Peter
Anzeige
Danke Peter..
28.12.2004 22:19:11
Sonnenpeter
Danke Peter,
es funktioniert auch.
Gruß Sonnenpeter
PS: Peter heist nicht jeder, wohl aber jeder Peter!! :-)))
Split-Funktion
Boris
Hi,
...auch wenn schon gelöst:
Ab xl2000 gibt´s dafür die Split-Funktion. Die ist wie geschaffen für deine Aufgabe.
Grüße Boris

299 Forumthreads zu ähnlichen Themen

Liste "definierter Namen" per VBA?
David

Hallo zusammen,
ist es per VBA möglich, die in einer Tabelle definierten Namen auszulesen, in einem neuen Sheet aufzulisten und daneben den/die mit dem Namen verbundene(n) Bereich bzw. Formel?
Ich würde mir gern bei umfangreichen Namensdefinitionen das Nachschauen im Menü ersparen, da j...
14.08.2008 12:15:44
Thread-ID: 1001809
5 Beiträge
Anzeige
Dynamische Wertänderung in VBA
Timo

Hallo,
ich habe ein kleines Problem und möchte vorab sagen, dass ich ein wirklicher VBA Laie bin. Ich habe folgendes Makro aufgenommen (nicht selbst geschrieben, da ich das nicht kann):
Sub updatechartloanvolumetrend()
If Range("C10") = "19981998" Then
ActiveSheet.ChartObjects("...
05.09.2008 09:38:00
Thread-ID: 1007590
3 Beiträge
VBA Warnhinweis Ignorieren
Asits

Hallo,
ich möchte per Macro Spalte A, in der Vor-und Nachname durch ein Komma getrennt sind
automatisch trennen.
Das mache ich mit:
Columns("B:B").Select
Selection.Insert Shift:=xlToRight
Range("B1").Select
ActiveCell.FormulaR1C1 = "Vorname"
Columns("A:A").Sele...
17.09.2008 20:12:04
Thread-ID: 1010513
3 Beiträge
Anzeige
Steuerelement Listbox1 in tabelle wird in VBA n
Mike

Hallo
Ich habe in einer Tabelle aus der Symbolleiste Steuerelemente ein Listenfeld in eine Tabelle eingefügt. Der Objektname lautet "Listbox1".
Über ein Makro will ich nun diese Listbox füllen.
Listbox1.additem "Text"
wenn ich das Makro ausführen wird die Listbox1 jedoc nicht ge...
28.11.2008 11:59:00
Thread-ID: 1028645
3 Beiträge
VBA prüfen, ob PC online ist!
Tobias

Hallo zusammen,
hab ein programm geschrieben das Währungskurse aus dem Internet läd und diese in einem Excelsheet ablegt.
Leider bekomme ich einen Abbruch wenn keine Internetverbindung besteht nun möchte ich gerne vor dem Update eine Prüfung durchführen ob der PC online ist.
ja Up...
04.12.2008 09:15:25
Thread-ID: 1030038
2 Beiträge
dynamischer Zellbezug in vba
Andi

Hallo Experten,
Ich wär euch sehr dankbar wenn ihr mir bei folgendem Problem weithelfen könnt. Ich versuch im beigelegten Dokument, Daten aus einer Pivottabelle über ein Makro darzustellen. Ich kann jedoch die Referenzzelle nicht gemäss der entsprechenden Zeile anpassen.
Bitte schauts...
09.01.2009 12:49:25
Thread-ID: 1038197
3 Beiträge
Summe von n bis n+t in VBA
n

Hallo zusammen
Leider habe ich sehr wenig Ahnung von VBA und probiere gerade eine Formel hinzubekommen. Sehr wahrscheinlich ist es für andere einfach, daher bitte ich um Rat.
Ich habe eine Spalte mit Zahlen (B2:B16).
Abgesehen von dieser Spalte habe ich zwei weitere Variablen: t und...
22.01.2009 17:06:49
Thread-ID: 1042696
4 Beiträge
Listbox mit verschiedenen Einträgen mit VBA ausles
Erik

Hallöle.
Folgende Situation:
Auf einem Excel-Sheet liegt eine Listbox. Hier sind unterschiedliche Werte eingetragen die auch einzeln markiert werden können.
Wie lese ich die Listbox mit einem Macro aus und wie vergebe ich ggf. dem Formular-Element einen Namen? Ich möchte dahin komm...
02.02.2009 14:46:09
Thread-ID: 1046261
5 Beiträge
Anzeige

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
4
16
2
2
3
2
1
2
3
4
4
12
1
2
2
1
2
4
2
3
2
10
14
3
3