Thema Datum  Von Nutzer Rating
Antwort
29.08.2019 14:07:39 Stan
NotSolved
Blau 1) Flexible Auswahl der Quellspalten durch Abgleich der Überschriften
29.08.2019 14:17:34 Werner
Solved
29.08.2019 14:34:54 Stan
NotSolved

Ansicht des Beitrags:
Von:
Werner
Datum:
29.08.2019 14:17:34
Views:
614
Rating: Antwort:
 Nein
Thema:
1) Flexible Auswahl der Quellspalten durch Abgleich der Überschriften

Hallo Stan,

hier mal ein kleines Beispiel:

Sub Makro1()
Dim strSuch As String, raFund As Range, loSpalte As Long

strSuch = "Spaltenüberschrift_die_du_suchst"

'Blattname anpassen
With Worksheets("Tabelle2")
    Set raFund = .Rows(1).Find(what:=strSuch, LookIn:=xlValues, lookat:=xlWhole)
    If Not raFund Is Nothing Then
        loSpalte = raFund.Column
    End If
    'hier kannst du dann auf die Spalte zugreifen
    'zum Testen wird die Spalte selektiert
    .Columns(loSpalte).Select
End With

Set raFund = Nothing
End Sub

Gruß Werner


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
29.08.2019 14:07:39 Stan
NotSolved
Blau 1) Flexible Auswahl der Quellspalten durch Abgleich der Überschriften
29.08.2019 14:17:34 Werner
Solved
29.08.2019 14:34:54 Stan
NotSolved