29. März 2024, 01:25
VB-fun.de - Beitragsübersicht zum VB-/VBA-Forum-Archiv 0406
  E03: Zwischenablage / Autofilter / Excel 2003 / VBA
 Von mgeschke
 eMail
 Am 04. März 2008 um 14:42:51
 Frage Hallo VBA Experten,

ich habe folgendes Problem. Mit diesem Makro setze ich in einer Tabelle mit Autofilter, den Filter auf den in der Zwischenablage befindlichen Wert.

Das Makro funktioniert auch bestens wenn der Inhalt der Zwischenablage z.B. aus dem Editor kopiert wurde.

Wird allerdings eine excel zelle in die Zwischenablage kopiert funktioniert es nicht. Werden da eventuell nicht sichtbare Steuerzeichen kopiert? Wie kann ich nur den puren Text aus der Zelle kopieren?

!!!
Benötigt einen Verweis auf die Microsoft Forms 2.0 Objektlibrary
!!!

Sub Filter_Active_Zelle()

Dim SpNr As Integer
Dim Such As String
Dim oData As New DataObject

oData.GetFromClipboard

AutoFilterMode = False
SpNr = ActiveCell.Column
Such = CStr("=*" & oData.GetText(1) & "*")
Selection.AutoFilter Field:=SpNr, Criteria1:=Such, Operator:=xlAnd


End Sub
[ VB-/VBA-Forum | Archiv 0406 | Archiv-Übersicht ]
 Antworten
E03: Zwischenablage / Autofilter / Excel 2003 / VBA - mgeschke 04. März 2008 um 14:42:51
Re: Zwischenablage / Autofilter / Excel 2003 / VBA - r.mueller@sz-online.de 04. März 2008 um 20:32:48
Re: Zwischenablage / Autofilter / Excel 2003 / VBA - mgeschke 06. März 2008 um 09:48:44

Zum Seitenanfang

Startseite | VB-/VBA-Tipps | Projekte | Tutorials | API-Referenz | Komponenten | Bücherecke | Gewinnspiele | VB-/VBA-Forum | DirectX | DirectX-Forum | VB.Net | VB.Net-Forum | Chat | Spielplatz | Links | Suchen | Stichwortverzeichnis | Feedback | Impressum