Thema Datum  Von Nutzer Rating
Antwort
27.02.2011 01:18:10 Ralf
NotSolved
Blau Letzte aktive Zelle kopieren in Range
 27.02.2011 10:54:37 Severus
NotSolved
27.02.2011 11:38:33 Ralf
NotSolved
27.02.2011 13:28:51 Severus
Solved
28.02.2011 12:30:04 Ralf
Solved
28.02.2011 12:30:04 Ralf
Solved

Ansicht des Beitrags:
Von:
Severus		 Datum:
27.02.2011 10:54:37		 Views:
951		 Rating:
     
Antwort:
  Ja
Thema:
Letzte aktive Zelle kopieren in Range		 
Sub Bereinigen()
Dim lngLetzteZeile As Long
With ActiveSheet
	lngLetzteZeile = .Cells(.Cells.Rows.Count, "F").End(xlUp).Row
	.Range("F3") = .Cells(lngLetzteZeile, "F")
	if lngLetzteZeile > 3 Then
		.Range(.Cells(4, "F"), .Cells(lngLetzteZeile, "F")).Select
		Selection.ClearContents
	End If
	.Range("F3").Activate
End With
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
27.02.2011 01:18:10 Ralf
NotSolved
Blau Letzte aktive Zelle kopieren in Range
 27.02.2011 10:54:37 Severus
NotSolved
27.02.2011 11:38:33 Ralf
NotSolved
27.02.2011 13:28:51 Severus
Solved
28.02.2011 12:30:04 Ralf
Solved
28.02.2011 12:30:04 Ralf
Solved