VBA Suchfunktion in eine Office Script Version ändern
20.08.2024 17:33:13
Kai87
ich benötige eure Hilfe.
Ich besitze eine Datenbank in der ich mir schon über VBA eine Suchfunktion erstellt habe.
Als Beispiel ich gebe in einer Zelle (B3) die 3 Buchstaben "ham" ein und er zeigt mir alle Spalten wo dieses "Wort" zu finden ist, Hamburg, Hamm, Hammer usw.
Sub Suche()
'Werte für Filter eintragen
Filter.Range("A2, B3, C4, D5, E6, F7, G8, H9, I10, J11").Value = "*" & Range("Suchkriterium").Value & "*"
'Erweiterten Filter anwenden
Range("Datenbank[#All]").AdvancedFilter xlFilterInPlace, Filter.Range("A1:J11")
End SubJetzt will ich die Datenbank über Teams oder Sharepoint teilen und nicht zum Download zur Verfügung stellen.
Leider stoße ich dann mit VBA an die Grenzen.
Und mir ist es nicht gelungen ein Script zu erstellen was mir die gleichen Möglichkeiten bietet.
Ich hoffe ich finde hier jemanden der mir helfen kann oder eventuell schon ein fertiges Office Script besitzt.
Vielen Dank schon mal im voraus!
Anzeige