ich verzweifle grad.
Ich habe eine Tabelle, in der ein Makro mir meine Subs (Subunternehmer) filtert.
Leider wird eine Funktion in "P129" und "Q129" nicht aktualisiert, während das Makro durchläuft.
Genau das benötige ich aber, da ich jeden gefilterten Wert ausdrucken möchte.
https://www.herber.de/bbs/user/138724.xlsm
Da ist die Datei, zusammen mit dem Makro und folgender Funktion:
Dim rg As Range
For Each rg In xRg
If (rg.EntireRow.Hidden = False) And (rg.EntireColumn.Hidden = False) Then
Outlookeintrag = Outlookeintrag & rg.Value & sptChar
End If
Next
Outlookeintrag = Left(Outlookeintrag, Len(Outlookeintrag) - Len(sptChar))
End Function
Wie bekomme ich es hin, dass die Funktion auch beim Autofilter jedes Mal berechnet wird?
Ich sitze seit Stunden daran und kriege es nicht hin.
Vielleicht kann mir hier jemand helfen?
Vielen Dank im Voraus.
Gruß
Andreas