Thema Datum  Von Nutzer Rating
Antwort
Rot Makro mit Zeilenauswahl
06.11.2019 13:51:11 Christoph
NotSolved
06.11.2019 20:28:44 xlKing
Solved
11.11.2019 11:27:58 Christoph
NotSolved

Ansicht des Beitrags:
Von:
Christoph
Datum:
06.11.2019 13:51:11
Views:
681
Rating: Antwort:
  Ja
Thema:
Makro mit Zeilenauswahl
Hallo zusammen, habe einen Makro aufgezeichnet der zuerst ein neues Sheet öffnet, eine Layout einfügt und dann aus 3 Sheets Daten holt und in Sheet 4 in bestimmte Zellen einfügt. Dies habe ich mit der Zeile 4 aufgezeichnet. Ist es möglich den Makro so zu programmieren damit ich vorher die Zeile auswählen kann? die bezüge zu den Spalten ändern sich nicht. Hier das Modul: ' Sheets("Projektkarte").Select Cells.Select Selection.Copy Sheets.Add After:=ActiveSheet Cells.Select ActiveSheet.Paste Range("BF35").Select Application.CutCopyMode = False ActiveWindow.DisplayZeros = False Range("O4:BD5").FormulaR1C1 = "=Projektspeicher!RC[-13]" Range("C4:N5").FormulaR1C1 = "=Definition!RC[-1]" Range("C9:N11").FormulaR1C1 = "=Planung!R[-5]C[1]" Range("C12:N14").FormulaR1C1 = "=Planung!R[-8]C[2]" Range("P9:AV17").FormulaR1C1 = "=Projektspeicher!R[-5]C[-13]" Range("D21:P22").FormulaR1C1 = "=Planung!R[-17]C[2]" Range("Q21:AC22").FormulaR1C1 = "=Planung!R[-17]C[-10]" Range("AD21:AP22").FormulaR1C1 = "=Planung!R[-17]C[-22]" Range("AQ21:BC22").FormulaR1C1 = "=Planung!R[-17]C[-34]" Range("M30:U31").FormulaR1C1 = "=Planung!R[-26]C[-11]" Range("V30:AD31").FormulaR1C1 = "=Planung!R[-26]C[-19]" Range("M32:AD33").FormulaR1C1 = "=Definition!R[-28]C[-10]" Range("AE31:AQ32").FormulaR1C1 = "=Definition!R[-27]C[-27]" Range("AR31:BD32").FormulaR1C1 = "=Definition!R[-27]C[-38]" Range("AR31:BD32").FormulaR1C1 = "=Definition!R[-27]C[-39]" Range("AE34:AQ35").FormulaR1C1 = "=Definition!R[-30]C[-25]" Range("BF37").Select End Sub

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 Makro mit Zeilenauswahl
06.11.2019 13:51:11 Christoph
NotSolved
06.11.2019 20:28:44 xlKing
Solved
11.11.2019 11:27:58 Christoph
NotSolved