Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
388to392
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
388to392
388to392
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Spalte durch variable ersetzen

Spalte durch variable ersetzen
25.02.2004 13:57:16
Joachim
Hallo zusammen,
ich möchte in folgender Zeiel die Spalte durch eine Variable ersetzen
kann mir jemand helfen?
Range("I8:I81").Select
Application.CutCopyMode = False
Selection.Copy
Gruß Joachim

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spalte durch variable ersetzen
25.02.2004 14:00:08
Galenzo
Hallo Joachim

eine Variable iRow für die Zeilennummer:
Dim iRow as Integer
iRow= 22
Range(cells(iRow,8),cells(iRow,81).copy
mfg
AW: Spalte durch variable ersetzen
25.02.2004 14:00:21
xXx
Hallo,
Range(Cells(Zeile1,Spalte1),Cells(Zeile2,Spalte2)).Copy
Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S. Das Forum lebt auch von den Rückmeldungen an die Antworter!
AW: Spalte durch variable ersetzen
25.02.2004 14:31:54
Joachim
Hallo,
erstmal vielen Dank für die Hilfe.
Die sache läuft aber noch nicht ganz
hier mein Makro
Range(Sp, 81).Select
If ActiveCell.Value = 1 Then
Range(Cells(Sp, 8), Cells(Sp, 81)).Select
Application.CutCopyMode = False
Selection.Copy
Range(Sp, 85).Select
ActiveSheet.Paste
Range(Cells(Sp, 8), Cells(Sp, 81)).Select
Range(Sp, 76).Activate
Application.CutCopyMode = False
Selection.ClearContents
Range(Sp, 76).Select
Ich bekomme schon in der Zeile Range(Sp, 81).Select die Fehlermeldung
"Die Methode Range für das Objekt Global ist fehlgeschlagen"
Woran liegt das.
Gruß Joachim
Anzeige
AW: Spalte durch variable ersetzen
25.02.2004 14:33:57
.
Hallo,
1. Falsch rum: Cells(Zeile,Spalte) muss es heißen.
2. Sp wird noch 0 sein. Spalte 0 gibt's nicht.
Gruß
AW: Spalte durch variable ersetzen
25.02.2004 14:39:11
jOACHIM
Hallo,
daran liegt es wohl nicht
vor dem Befehl kommt noch
Dim Sp As Integer
Sp = ActiveCell.Column
Die Spalte wird richtig eingelesen ( hab ich kontroliert)
Ich hab jetzt die Variable und die Zeile getausch krieg aber immernoch die gleiche Meldung.
gruß
AW: Spalte durch variable ersetzen
25.02.2004 14:50:49
AndreasS
Hi,
Range(Sp, 81)?
So muss es heißen: Cells(81,Sp)-> da cells(Zeilen,Spalten)
Gruß Andreas
AW: Spalte durch variable ersetzen
25.02.2004 14:56:42
AndreasS
Hi,
so müßte dein Makro aussehen (übrigens kannst du fast das ganze select weglassen, aber fürs Verständnis vielleicht ganz gut):
Dim Sp As Integer
Sp = ActiveCell.Column
Cells(81, Sp).Select
If ActiveCell.Value = 1 Then
Range(Cells(8, Sp), Cells(81, Sp)).Select
Application.CutCopyMode = False
Selection.Copy
Cells(85, Sp).Select
ActiveSheet.Paste
Range(Cells(8, Sp), Cells(81, Sp)).Select
Cells(76, Sp).Activate
Application.CutCopyMode = False
Selection.ClearContents
Cells(76, Sp).Select
Gruß Andreas
Anzeige
AW: Spalte durch variable ersetzen
25.02.2004 16:20:52
Joachim
Hallo,
vielen Dank an das Forum für die Hilfe.
Gruß Joachim

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige