Supportnet / Forum / Tabellenkalkulation
Makro bei Änderung einer Zelle
Frage
Hallo Ihr klugen Leuten!
Ich habe eine Excel-Datei gebastelt, bei der über Markos Spezialfilter ablaufen bei Änderung einer bestimmten Zelle. Auf meinem PC läuft dies hervorragend.
Jetzt habe ich diese Datei einer bekannten geschickt, da muss man die Makros manuell anstossen. Dadurch ist die Funktion nicht mehr gegeben.
Was kann ich ändern.
Ein Makro als Beispiel angehängt.
Private Sub Worksheet_Change(ByVal Target As Range)
Set Target = Range("c4")
Application.CutCopyMode = False
Range("!A3:B482").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _
"!c3:d4"), CopyToRange:=Range("!c6:d19"), Unique:=True
End Sub
Für einen Hinweis sehr dankbar.
Lieben Gruß
Coockie
Antwort 1 von rolandaa
der fehler könnte bei einer anderen excelversion liegen
mfg
roalnd
mfg
roalnd
Antwort 2 von nighty
hi all :)
meine vermutungen :)
gruss nighty
zu dieser zeile
Set Target = Range("c4")
Target ist schon eine objektvariable
angegeben in dieser zeile
Private Sub Worksheet_Change(ByVal Target As Range)
zu dieser zeile
Application.CutCopyMode = False
unnötig durch direkte adressierung der zellen
zu dieser zeile
Range("!A3:B482").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _
"!c3:d4"), CopyToRange:=Range("!c6:d19"), Unique:=True
koennte man ein .value bei range probieren
wofuer steht das ausrufezeichen ?
gruss nighty
meine vermutungen :)
gruss nighty
zu dieser zeile
Set Target = Range("c4")
Target ist schon eine objektvariable
angegeben in dieser zeile
Private Sub Worksheet_Change(ByVal Target As Range)
zu dieser zeile
Application.CutCopyMode = False
unnötig durch direkte adressierung der zellen
zu dieser zeile
Range("!A3:B482").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _
"!c3:d4"), CopyToRange:=Range("!c6:d19"), Unique:=True
koennte man ein .value bei range probieren
wofuer steht das ausrufezeichen ?
gruss nighty
Antwort 3 von Coockie
Hallo Ihr Lieben,
dank Eurer Hilfe bin ich dem Problem bei meinen Bekannten nachgegangen.
Manchmal ist es dann viel einfacher als gedacht. Einmal war es eine alte Excel-Version, mit der neuen lief alles perfect.
Beim Anderen war es eine ganz neue Version mit ganz hoher Sicherheitseinstellung, die Makros wurden daher nicht geöffnet.
Mein Makro habe ich dank der Hinweise überarbeitet, es waren alte Fragmente vorhanden, die mir nicht auffielen, weil es trotzdem lief.
Vielen Dank für Eure Hilfe.
Lieben Gruß
Coockie
dank Eurer Hilfe bin ich dem Problem bei meinen Bekannten nachgegangen.
Manchmal ist es dann viel einfacher als gedacht. Einmal war es eine alte Excel-Version, mit der neuen lief alles perfect.
Beim Anderen war es eine ganz neue Version mit ganz hoher Sicherheitseinstellung, die Makros wurden daher nicht geöffnet.
Mein Makro habe ich dank der Hinweise überarbeitet, es waren alte Fragmente vorhanden, die mir nicht auffielen, weil es trotzdem lief.
Vielen Dank für Eure Hilfe.
Lieben Gruß
Coockie