Thema Datum  Von Nutzer Rating
Antwort
Rot Beliebige Zeile markieren und an beliebiger stelle einfügen
04.09.2020 13:15:51 Roland
Solved
04.09.2020 13:17:32 Gast8577
NotSolved
04.09.2020 13:56:33 Mase
NotSolved
04.09.2020 18:23:51 xlKing
NotSolved
04.09.2020 18:45:42 Mase
NotSolved
06.09.2020 12:32:28 Gast66364
NotSolved
06.09.2020 13:14:55 Mase
NotSolved
06.09.2020 14:05:00 Roland
NotSolved
06.09.2020 16:16:09 Mase
NotSolved
06.09.2020 21:32:28 Roland
Solved

Ansicht des Beitrags:
Von:
Roland
Datum:
04.09.2020 13:15:51
Views:
976
Rating: Antwort:
 Nein
Thema:
Beliebige Zeile markieren und an beliebiger stelle einfügen

ich möchte in einem Arbeitsblattt einen Zeile kopieren und dies dann in einem andern beliegigen Bereich einfügen.

Ähnlich der Funktion CTRL+C und dann CTRL +V

Der Anwender soll nach aktivieren des Macros aufgefordert werden: "makieren sie die Quelle mit Mausklick"

und dann "markieren sie das Ziel mit Mausklick"

die einzelnen schritte können so aussehen:

Sub aaa()
    If ActiveCell.Row > 82 Then
        Quelle = ActiveCell.Row
        Quelle = Quelle & ":" & Quelle
    End If
 
End Sub
 
Sub bbb()
    If ActiveCell.Row > 82 Then
        Rows(Quelle).Copy
        Cells(ActiveCell.Row + 1, 3).Activate
        Application.CutCopyMode = False
    End If
End Sub
 
wie kann ich die beiden Schritte in einem Makro abfragen?

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 Beliebige Zeile markieren und an beliebiger stelle einfügen
04.09.2020 13:15:51 Roland
Solved
04.09.2020 13:17:32 Gast8577
NotSolved
04.09.2020 13:56:33 Mase
NotSolved
04.09.2020 18:23:51 xlKing
NotSolved
04.09.2020 18:45:42 Mase
NotSolved
06.09.2020 12:32:28 Gast66364
NotSolved
06.09.2020 13:14:55 Mase
NotSolved
06.09.2020 14:05:00 Roland
NotSolved
06.09.2020 16:16:09 Mase
NotSolved
06.09.2020 21:32:28 Roland
Solved