Thema Datum  Von Nutzer Rating
Antwort
Rot Excel 2010 Worksheet_De/Activate-Problem
 14.01.2015 15:43:58 Esmeralda
NotSolved
15.01.2015 12:32:46 Holger
NotSolved
16.01.2015 10:34:49 Gast87373
NotSolved

Ansicht des Beitrags:
Von:
Esmeralda		 Datum:
14.01.2015 15:43:58		 Views:
1103		 Rating:
     
Antwort:
  Ja
Thema:
Excel 2010 Worksheet_De/Activate-Problem

Hallo allerseits,

für eine einfache Empfängerverwaltung habe ich mir eine Arbeitsmappe mit zwei Tabellen gebastelt. Auf der ersten wird per DropDown und VERWEIS() ein Formular ausgefüllt. Die Daten dafür kommen aus einer zweiten, die ich bisher mit Worksheet_Activate alphabethisch sortiert.

Was bei Activate wunderbar funktioniert, führt bei Deactivate zu einem Lauzeitfehler 1004 "Die Select-Methode des Range-Objekts konnte nicht ausgeführt werden". Der Debugger zeigt dann auf Zeile 4 des folgenden Codes:

'Private Sub Worksheet_Activate()
Private Sub Worksheet_Deactivate()
' Definition Sortier-Bereich
Range("A3:F200").Select
' Sortier-Prozedur
ActiveWorkbook.Worksheets("Empfänger").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Empfänger").Sort.SortFields.Add Key:=Range("A3"), _
        SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
        xlSortTextAsNumbers
    With ActiveWorkbook.Worksheets("Empfänger").Sort
        .SetRange Range("a3:f200")
        .Header = xlNo
        .MatchCase = False
        .Orientation = xlTopToBottom
        .Apply
    End With
Range("A3").Select
End Sub

Was muss ich bei der Deactivate-Version anders machen? Vielen Dank im Voraus!

 

Lg Esmeralda

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 Excel 2010 Worksheet_De/Activate-Problem
 14.01.2015 15:43:58 Esmeralda
NotSolved
15.01.2015 12:32:46 Holger
NotSolved
16.01.2015 10:34:49 Gast87373
NotSolved