Zelle in Spalte

Forumthread: Zelle in Spalte

Zelle in Spalte

hajokle

Hallo zusammen,
ich möchte in einer errechneten Spalte die 2 Zelle ansprechen. Kann mir jemand bei dem passenden VBA Befehl helfen?
Danke
HaJoKle

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

AW: Zelle in Spalte

12.08.2009 16:01:22

Hajo_Zi

Hallo Hajo,
cells(2, errrechneteSpalte)

AW: Zelle in Spalte

12.08.2009 16:49:54

hajokle

Hallo
Funzt nicht
Sheets("Kosten_VR").Cells(2, Columns(" & spaltekoges & ")).Select
spaltekoges ist der Wert der Spalte Hier gibt es immer eine Fehlermeldung Typen unverträglich

AW: Zelle in Spalte

12.08.2009 16:57:23

Hajo_Zi

Halo Hajo,
im ersten Beitrag wolltest Du eine Zelle ansprechen. Warum hast Du dazu meinen Vorschlag nicht umgesetzt?
Sheets("Kosten_VR").Cells(2, spaltekoges )=123
Excel ist ein vielseitiges Programm und man kann viele Probleme damit lösen. Jede positive Seite hat aber auch negative Aspekte - einer davon ist im Makrorecorder enthalten.
Die Bücher, die es zu Excel VBA gibt, erklären viele Funktionen, aber ich habe bisher nur in einem gelesen, dass der vom Makrorecorder aufgezeichnete Code bereinigt werden sollte.
Der Makrorecorder zeichnet alle Aktionen auf, u. a. auch das Auswählen einer Zelle oder eines eingebetteten Objektes (Bild, Diagramm, Zeichnungsobjekt usw.) dabei wird generell Select und Activate aufgezeichnet. Diese Befehle sind in VBA zu 99,9% nicht notwendig. Sie lassen den Bildschirm flackern und senken die Geschwindigkeit bei der Ausführung des Codes. Man sollte also schon von Beginn an bei der Programmierung darauf achten, solche Befehle zu vermeiden. Meine Erfahrung mit dem Vorsatz: Das mache ich später ist, man schreibt das Programm später meist komplett neu. Also kostest es nicht nur Rechnerzeit sondern auch Deine Zeit und ist Dir Deine Zeit so wenig Wert?
Zum Vergleich mit und ohne Select schau Dir auch mal diese Beispielarbeitsmappe an: mit und ohne select Auf meiner Homepage sind alle meine Beispiele ohne Select. Da kann man sich also einige Lösungsansätze zu diesem Thema ansehen.
Gruß Hajo

AW: Zelle in Spalte

12.08.2009 17:08:47

Original

Hi Hajo,
Mensch, jetzt kannst du ja auch kopieren, Hut ab!
mfg Kurt

AW: Zelle in Spalte

12.08.2009 17:12:30

Hajo_Zi

Halo Kurt,
solche Sachen brauche ich nicht kopieren.
Gruß Hajo

AW: Zelle in Spalte

12.08.2009 17:11:35

hajokle

Hallo HaJo
ich glaube ich stehe auf der Leitung.
Cells(2, " & spaltekoges & ") = hier Fehler 13 Typen Unverträglichkeit
ActiveCell.FormulaR1C1 = "Kosten " & monat & " Gesamt"
Ich versuche alles was der Makrorekorder ausspuckt anzupassen, aber nicht immer kommt etwas gutes dabei heraus.
Gruß
HaJo

AW: Zelle in Spalte

12.08.2009 17:15:14

Hajo_Zi

Hallo Hajo,
da mußt Du mich nicht Fragen sondern den vom Du diesen Vorschlag hast.
Gruß Hajo

AW: spaltekoges

12.08.2009 20:29:32

Gerd

Hallo,
was ist das ?
wo u. womit erhält dieser 'Befehl' seinen Wert?
wie sieht dieser aus ?
Gruß Gerd

AW: spaltekoges

13.08.2009 07:57:24

hajokle

intNr = Cells(2, Columns.Count).End(xlToLeft).Column = hier erhält intNr den Wert 30
Range(Columns(27), Columns(30)).Select = funktioniert
Selection.Cut = funktioniert
Range(Columns(31), Columns(34)).Select = funktioniert
ActiveSheet.Paste funktioniert
spaltekoges = intNr - 3 = funktioniert
Columns(" & spaltekoges & "), 2.Select = falscher Befehl
ActiveCell.FormulaR1C1 = "Kosten " & monat & " Gesamt"
Ich ermittle die letzte Spalte gefüllte Spalte einer Tabelle, schneide 4 bestimmte Spalten aus ( ich weiß vorher nicht welche). Füge die Spalten an anderer Stelle wieder ein. Dann will ich in die freigewordenen Spalten etwas einfügen. Um die Spalte anzusprechen benutze ich die Variable spaltekoges. Ich suche nach einer Möglichkeit die 2. Zelle in den freigewordenen Spalten anzusprechen.
Für Deine Hilfe währe ich sehr dankbar.
Gruss
HaJo

Cells(2,spaltekoges).Select ? owT

13.08.2009 08:07:13

robert

AW: Das ist schon vorgeschlagen ohne select

13.08.2009 08:38:33

Hajo_Zi

Hallo Robert,
das habe ich auch schon ohne select vorgeschlagen, aber Hajo möchte es so nicht einsetzen.
Gruß Hajo

@Hajo..

13.08.2009 13:26:31

robert

hi,
habe mich nur auf diesn beitrag bezogen:
Columns(" & spaltekoges & "), 2.Select = falscher Befehl
denn diese variante ist ja völlig falsch, du hast es ja schon richtig vorgeschlagen :-)
aber wer nicht will, der hat schon....
gruß
robert

Beliebteste Forumthreads (12 Monate)

Forumthread: Zelle in Spalte

12
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Zelle in Spalte

Forumthread: Zelle in Spalte

12 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

12
Beiträge zum Forumthread

Beiträge zu diesem Forumthread