Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Variablen in Columns()
zurück: Letztes ausgeführte Makro wieder rückgängig machen? weiter: Infos aus letzter Abgespeicherter Mappe holen Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Darkon
blutiger Anfänger


Verfasst am:
16. Mai 2011, 23:38
Rufname:

Variablen in Columns() - Variablen in Columns()

Nach oben
       Version: Office 2010

Hallo Forum,

ich wüsste gerne wie man Variablen in der Columns("").Select Anweisung verwenden kann. Ich hätte hier diesen Code für Spalte A:

Code:
Sub Makro14()
'
' Makro14 Makro
'

'
    Columns("A:A").Select
    Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=False, _
        Semicolon:=False, Comma:=False, Space:=True, Other:=False, FieldInfo _
        :=Array(1, 1), TrailingMinusNumbers:=True
End Sub


Jetzt würd ich gern eine Schleife von Spalte A bis V laufen lassen, die den Code auf die jeweilige Spalte anwendet. Wie kriegt man das hin?

Schönen Gruß,Darko
Gerd L
Just for fun


Verfasst am:
16. Mai 2011, 23:55
Rufname:
Wohnort: Mannheim


AW: Variablen in Columns() - AW: Variablen in Columns()

Nach oben
       Version: Office 2010

Hallo Darkon!

Code:
Columns("A:A").Select
    Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=False, _
        Semicolon:=False, Comma:=False, Space:=True, Other:=False, FieldInfo _
        :=Array(1, 1), TrailingMinusNumbers:=True


Erst mal das Selektier herausnehmen:

Code:
Columns("A:A").TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=False, _
        Semicolon:=False, Comma:=False, Space:=True, Other:=False, FieldInfo _
        :=Array(1, 1), TrailingMinusNumbers:=True



Dann mit einer Variablen in eine Schleife stellen:

Code:
Dim lngCol As Long


For lngCol = 1 To 22
Columns(lngCol).TextToColumns Destination:=Cells(1, lngCol), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=False, _
        Semicolon:=False, Comma:=False, Space:=True, Other:=False, FieldInfo _
        :=Array(1, 1), TrailingMinusNumbers:=True
Next


Ob dies so erforderlich ist, wenn immer nur über eine Spalte gehuscht wird, ist eine andere Frage.

_________________
Gruß Gerd
slowboarder
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Mai 2011, 00:04
Rufname:

AW: Variablen in Columns() - AW: Variablen in Columns()

Nach oben
       Version: Office 2010

Hi
bei Columns() kann man statt des Spaltenbuchstabens auch die Spaltennummer verwenden:

Columns(1) statt Columns("A:A")

Ebenso kann man für Einzelzellen statt Range(addresse) auch Cells(zeilennummer, spaltennummer) verwenden:

Cells(1, 2) statt Range("B2")

und wie man einfache Zahlen durch Variablen ersetzt und in eine Schleife einbindet muss ich dir hoffentlich nicht erklären.

@Gerd:
wahrscheinlich schon, Text in Spalten ist nur auf eine Spalte anwendbar.
wenn darum geht, Ziffernfolgen in Zahlen umzuwandeln, könnte man auch irgendwo eine 1 reinschreiben, kopieren und auf alle Textwerte multiplikativ einfügen.

Gruss Daniel
Darkon
blutiger Anfänger


Verfasst am:
17. Mai 2011, 00:40
Rufname:


AW: Variablen in Columns() - AW: Variablen in Columns()

Nach oben
       Version: Office 2010

Hallo Gerd,

besten Dank, funktioniert Smile



Hallo Daniel,

besten Dank, das mit den Nummern in Columns(1) wusst ich noch nicht, hab das die Tage erst bei .Worksheets(1) für mich entdeckt ^^. In Cells() verwende ich schon lange Variablen und Nummern, bloß aus irgendwelchen Gründen die ich grad nicht nachvollziehn kann hat das bei mir mit den Variablen in Columns() nicht funktioniert. Vllt weil ich Select. drin hatte...

Gruß,Darko
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Variablen einer Polynomfunktion ersetzten 1 worms84 372 18. Mai 2009, 16:22
Thomas Ramel Variablen einer Polynomfunktion ersetzten
Keine neuen Beiträge Excel Formeln: Funktion mit Variablen / Interpolationspolynome 5 Gast 291 16. Mai 2009, 21:14
Janni 07 Funktion mit Variablen / Interpolationspolynome
Keine neuen Beiträge Excel Formeln: Formel kopieren mit 1 festen und 1 variablen Wert 1 Steffi_1st 1108 15. Apr 2009, 14:56
silex1 Formel kopieren mit 1 festen und 1 variablen Wert
Keine neuen Beiträge Excel Formeln: Summenprodukt mit einer Variablen 12 Road66 474 26. Feb 2009, 04:05
Gast Summenprodukt mit einer Variablen
Keine neuen Beiträge Excel Formeln: Diagramm mit Variablen Werten 6 bermudez 1210 16. Nov 2008, 23:30
bermudez Diagramm mit Variablen Werten
Keine neuen Beiträge Excel Formeln: Zusammenfügen von Variablen 0 J.J. 1282 15. Sep 2008, 09:41
J.J. Zusammenfügen von Variablen
Keine neuen Beiträge Excel Formeln: Sverweis mit variablen Spaltenindex 7 RonLion 10332 08. Aug 2008, 11:16
McAdder Sverweis mit variablen Spaltenindex
Keine neuen Beiträge Excel Formeln: Zählenwenn mit 2 Variablen 15 Silvio10 1485 07. Aug 2008, 10:34
Silvio10 Zählenwenn mit 2 Variablen
Keine neuen Beiträge Excel Formeln: Problem mit der inkonsistenten Variablen 4 volunteer 473 15. Jul 2008, 17:20
volunteer Problem mit der inkonsistenten Variablen
Keine neuen Beiträge Excel Formeln: Wenn- formel und verweis mit variablen Start-zellen 5 Heinrichz5 1707 14. Jul 2008, 08:58
NOAH Wenn- formel und verweis mit variablen Start-zellen
Keine neuen Beiträge Excel Formeln: sverweis (oder Ähnliches) mit 3 Variablen 3 inhabitant 2816 16. Jun 2008, 15:10
inhabitant sverweis (oder Ähnliches) mit 3 Variablen
Keine neuen Beiträge Excel Formeln: Differenz zwischen zwei variablen Datumsangaben 5 Rixxa 2508 04. Jun 2008, 06:49
Rixxa Differenz zwischen zwei variablen Datumsangaben
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft-Excel Diagramme