Thema Datum  Von Nutzer Rating
Antwort
Rot komplette zeile der aktiven zelle markieren
22.01.2012 16:41:29 Fabian
Solved
22.01.2012 17:28:44 Holger
NotSolved
22.01.2012 20:19:07 Gast72472
NotSolved

Ansicht des Beitrags:
Von:
Fabian
Datum:
22.01.2012 16:41:29
Views:
1588
Rating: Antwort:
 Nein
Thema:
komplette zeile der aktiven zelle markieren

Hallo

Bin absoluter Neuling und hänge an einem wahrscheinlich winzigem problem. Möchte anstatt Range B5:M5 das er die am Anfang ausgewählte Zeile B bis M auswählt.

Wäre für eine schnelle Antwort sehr dankbar.

 

Sub absetzen()
'
' Makro2 Makro
'
' Tastenkombination: Strg+b
    ActiveCell.FormulaR1C1 = Date
    Range("B5:M5").Select
    Selection.Copy
    Sheets("abgesetzte Medis").Select
    Range("B4").Select
    Selection.Insert Shift:=xlDown
    Sheets("Mediblatt").Select
    Range("B5:M5").Select
    Selection.EntireRow.Delete
    Range("C25").Select
    Selection.EntireRow.Insert
    Sheets("abgesetzte Medis").Select
    Range("M4").Select
End Sub

Sub absetzen()
'
' Makro2 Makro
'
' Tastenkombination: Strg+b
    ActiveCell.FormulaR1C1 = Date
    Range("B5:M5").Select
    Selection.Copy
    Sheets("abgesetzte Medis").Select
    Range("B4").Select
    Selection.Insert Shift:=xlDown
    Sheets("Mediblatt").Select
    Range("B5:M5").Select
    Selection.EntireRow.Delete
    Range("C25").Select
    Selection.EntireRow.Insert
    Sheets("abgesetzte Medis").Select
    Range("M4").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 komplette zeile der aktiven zelle markieren
22.01.2012 16:41:29 Fabian
Solved
22.01.2012 17:28:44 Holger
NotSolved
22.01.2012 20:19:07 Gast72472
NotSolved