Thema Datum  Von Nutzer Rating
Antwort
25.09.2024 13:19:18 Frank
NotSolved
25.09.2024 13:31:15 Gast70378
NotSolved
Rot für den Fall das ich dich falsch verstanden habe...
25.09.2024 16:52:47 Gast70378
NotSolved
25.09.2024 17:10:12 Gast59280
NotSolved
25.09.2024 17:06:00 Gast70378
NotSolved
15.10.2024 22:09:05 Gast95385
NotSolved
16.10.2024 11:53:23 Gast70378
NotSolved

Ansicht des Beitrags:
Von:
Gast70378
Datum:
25.09.2024 16:52:47
Views:
63
Rating: Antwort:
  Ja
Thema:
für den Fall das ich dich falsch verstanden habe...

Nach erneutem Lesen glaube ich, du meinst keine Workbook-Vorlage sondern eines deiner Tabellenblätter wird von dir als Vorlage verwendet (copy&paste).

In dem Fall, wenn deine Tabellenblatt-Vorlage "Blanko" heißt:

Private Sub Worksheet_Activate()
  
  ' Die Methode liegt in der Vorlage und wird beim Kopieren mit kopiert.
  ' Wir prüfen hier ob der Name der Name der Vorlage ist, und falls ja, ist hier ende.
  If Me.Name = "Blanko" Then
    Exit Sub
  End If
  
  Dim rng As Range
  Set rng = ActiveSheet.Range("A:A").Find(What:=Date - 5, LookIn:=xlValues, LookAt:=xlWhole)
  If Not rng Is Nothing Then Application.Goto rng, True
  
End Sub

Du siehst, das Konzept ist ähnlich. wink


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
25.09.2024 13:19:18 Frank
NotSolved
25.09.2024 13:31:15 Gast70378
NotSolved
Rot für den Fall das ich dich falsch verstanden habe...
25.09.2024 16:52:47 Gast70378
NotSolved
25.09.2024 17:10:12 Gast59280
NotSolved
25.09.2024 17:06:00 Gast70378
NotSolved
15.10.2024 22:09:05 Gast95385
NotSolved
16.10.2024 11:53:23 Gast70378
NotSolved