Thema Datum  Von Nutzer Rating
Antwort
29.06.2021 10:09:08 Yunus
NotSolved
29.06.2021 10:29:08 Gast20835
****
NotSolved
29.06.2021 10:41:01 Gast47484
NotSolved
29.06.2021 11:06:21 Gast95571
NotSolved
29.06.2021 11:41:50 Gast28930
NotSolved
29.06.2021 12:14:44 Gast69589
NotSolved
29.06.2021 12:20:02 Gast85860
NotSolved
Blau Hier ableiten...
 29.06.2021 12:38:28 Gast91806
*****
NotSolved
29.06.2021 16:01:26 Yunus
NotSolved
29.06.2021 16:46:06 Gast95382
NotSolved
29.06.2021 18:22:43 Gast89384
NotSolved

Ansicht des Beitrags:
Von:
Gast91806		 Datum:
29.06.2021 12:38:28		 Views:
497		 Rating:
     
Antwort:
  Ja
Thema:
Hier ableiten...		 
Sub voidDeleteColumns()

    Dim arr         As Variant
    Dim element     As Variant
    Dim vRet        As Variant
    
    arr = Array("Service Nummer", "Kreditor", "Straße")
    
    For Each element In arr
        vRet = Application.Match(element, Rows("1:1"), 0)
        If Not IsError(vRet) Then Columns(vRet).Delete
    Next
    
End Sub

 

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.06.2021 10:09:08 Yunus
NotSolved
29.06.2021 10:29:08 Gast20835
****
NotSolved
29.06.2021 10:41:01 Gast47484
NotSolved
29.06.2021 11:06:21 Gast95571
NotSolved
29.06.2021 11:41:50 Gast28930
NotSolved
29.06.2021 12:14:44 Gast69589
NotSolved
29.06.2021 12:20:02 Gast85860
NotSolved
Blau Hier ableiten...
 29.06.2021 12:38:28 Gast91806
*****
NotSolved
29.06.2021 16:01:26 Yunus
NotSolved
29.06.2021 16:46:06 Gast95382
NotSolved
29.06.2021 18:22:43 Gast89384
NotSolved