Thema Datum  Von Nutzer Rating
Antwort
Rot Macro zum kopieren von Werten
19.08.2022 16:03:13 Lennart
Solved
19.08.2022 20:26:18 Gast35920
NotSolved
20.08.2022 09:58:59 Gast25705
NotSolved

Ansicht des Beitrags:
Von:
Lennart
Datum:
19.08.2022 16:03:13
Views:
296
Rating: Antwort:
 Nein
Thema:
Macro zum kopieren von Werten

Guten Tag,
meine VBA-Kentnisse sind schon ein wenig eingestaubt und ich komme leider nicht weiter. Das Macro soll noch komplexer werden, ich scheitere aber schon an der "simpelsten" Aufgabe.

Es sollen Werte aus einer Zeile einer Spalte ausgelesen werden und in eine neue Zeile einer neuen Spalte kopiert werden, solange bis eine leere Zeile angetroffen wird (perspektivisch soll dieser Wert in ein anderes Tabellenblatt kopiert, umgerechnet, und das Ergebnis neben die vorherige Zahl geschrieben werden). Folgendes habe ich bisher:

Sub Makro1()
'
' Makro1 Makro
'

Range("B3").Select
    
    Do Until IsEmpty(ActiveCell)
    ActiveCell.Copy
    Range("H3").Insert
    ActiveCell.Offset(1, 0).Select
    
    Loop

 

End Sub


Ich bekomme die Werte kopiert und in die andere Zeile geschrieben, allerdings werden diese invers dargestellt:

Werte kopierte Werte
0,091 0,104
0,095 0,101
0,098 0,098
0,101 0,095
0,104 0,091

Für Hilfe bedanke ich mich im vorab.

Beste Grüße
Lennart
 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Macro zum kopieren von Werten
19.08.2022 16:03:13 Lennart
Solved
19.08.2022 20:26:18 Gast35920
NotSolved
20.08.2022 09:58:59 Gast25705
NotSolved