---

Guten Morgen,

habe im Netz gelesen dass man auf Select verzichten soll wegen "Geschwindigkeit". Ich habe den Fall wo ich Spalten vertauschen muß. Beispiel-- Ich selektiere Spalte B, schneide Inhalt aus und füge diesen in Spalte A ein - sieht bei mir so aus

Columns("B:B").Select
Columns("B:B").Cut Destination:=Columns("A:A")

wie würde das ohne select aussehen?

Danke mal

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

Original erstellt von röhmler:

Columns("B:B").Select
Columns("B:B").Cut Destination:=Columns("A:A")

wie würde das ohne select aussehen?

---

Hallo,

Columns("B:B").Cut Destination:=Columns("A:A") funktioniert.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

SUPER,

danke

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

Original erstellt von Jester_Karbach:

Hallo,

Columns("B:B").Cut Destination:=Columns("A:A") funktioniert.

---

Hi,
jetzt habe ich noch ne Frage, habe markeiren und Spalten autom. anpassen auch anpassen wollen, aber funktioniert net. kannst mal bitte drüber schauen?

Columns("A:F").Select
    Columns("A:F").EntireColumn.AutoFit

nun

Columns("A:F").EntireColumn.AutoFit

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Moin röhmler,

hier erneut die Leseempfehlung: Achtung Makrorekorder oder Wer selektiert denn da?.
Evtl. doch nochmal intensiver durcharbeiten...
die Zeile Columns("A:F").EntireColumn.AutoFit funktioniert einwandfrei auch ohne dass Du die Spalten vorher selektierst.
Stell sicher, dass Du auf dem richtigen Sheet bist.

PS: "Funktioniert net" ist keine so richtig gute Fehlerbeschreibung 

------------------
Gruß,
runkelruebe          Herr Kann-ich-nich wohnt in der Will-ich-nich-Straße...

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Merci
und schönes Weekend  ;-)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP