Thema Datum  Von Nutzer Rating
Antwort
02.09.2021 13:03:44 Simon
NotSolved
Blau Kopieren von Werten in nächste freie Spalte
02.09.2021 13:48:19 Werner
NotSolved
02.09.2021 14:04:31 Gast5829
Solved

Ansicht des Beitrags:
Von:
Werner
Datum:
02.09.2021 13:48:19
Views:
596
Rating: Antwort:
  Ja
Thema:
Kopieren von Werten in nächste freie Spalte

Hallo,

Public Sub nächste_Spalte()
Dim loSpalte As Long

With Worksheets("x1")
    loSpalte = .Cells(8, .Columns.Count).End(xlToLeft).Offset(, 1).Column
    .Cells(8, loSpalte).Value = Worksheets("y1").Range("BD9").Value
    .Cells(9, loSpalte).Value = Worksheets("y1").Range("BD14").Value
    .Cells(10, loSpalte).Value = Worksheets("y1").Range("BD19").Value
    .Cells(11, loSpalte).Value = Worksheets("y1").Range("BD20").Value
    .Cells(12, loSpalte).Value = Worksheets("y1").Range("BD25").Value
End With

End Sub

 

Gruß Werner


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
02.09.2021 13:03:44 Simon
NotSolved
Blau Kopieren von Werten in nächste freie Spalte
02.09.2021 13:48:19 Werner
NotSolved
02.09.2021 14:04:31 Gast5829
Solved