Wert an Variable übergeben

Forumthread: Wert an Variable übergeben
3 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Wert an Variable übergeben

10.07.2002 10:46:14

MikeS

Hallo Leute,

im nachfolgendem Codeauszug habe ich 2Mappen geöffnet und
möchte einer Variablen eine komplette Zeile eines Sheets
übergeben, um diese Zeile in dem anderen Blatt einzufügen.

Eingefügt in meinem Zielblatt wird aber nur "Kopie".
Meine Variable "rZeile" ist als Range dimensioniert.

Wo liegt mein Fehler???

Vielen Dank
Ciao MikeS

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Re: Wert an Variable übergeben

10.07.2002 11:16:03

Hans W. Herber
Re: Wert an Variable übergeben

10.07.2002 11:16:18

ajk
Re: Wert an Variable übergeben

10.07.2002 11:24:43

MikeS

Re: Wert an Variable übergeben

10.07.2002 11:16:03

Hans W. Herber

Hallo Mike,

zu dem Code gebe es eine ganze Menge zu schreiben. Zum Beispiel, dass Objektvariablen mit "Set" bestückt werden. Oder dass Selektieren bei der VBA-Programmierung Teufelszeug ist. Oder dass Matrix-Variablen anders belegt werden, oder ...

Der Code, der das Gewollte umsetzt:

hans

Re: Wert an Variable übergeben

10.07.2002 11:16:18

ajk

HAllo,
Dein Fehler ist die letzte Zeile Probier mal:

If ActiveCell.Value = "Kopie" Then
rZeile = ActiveCell.EntireRow.select
Selection.Copy
Workbooks("Zielmappe").Activate
Sheets("Zieltabelle").Activate
Cells(lqZeile, 1).Select
lqZeile = lqZeile + 1
ActiveCell.EntireRow.select
ActiveSheet.Paste

Gruß
AJK