Thema: Abfrage der markierten Spalten

Download Beispiel-Arbeitsmappe

Home

Gruppe

Allgemein

Problem

Wie kann ich über VBA abfragen, welche Spalten in einer Mehrbereichsauswahl markiert sind?

Lösung

Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub SelectionColumns()
   Dim iCol As Integer
   Dim sMsg As String
   For iCol = 1 To 256
      If Not Intersect(Selection, Columns(iCol)) Is Nothing Then
         sMsg = sMsg & iCol & ","
      End If
   Next iCol
   MsgBox "Markiert: " & Left(sMsg, Len(sMsg) - 1)
End Sub

Beiträge aus dem Excel-Forum zu den Themen Allgemein und Bereich

Dynamischer Datenbereich im Diagramm	Bereich als Bild speichern.
1. freie Zelle in nicht zusammenhängenden Bereich	Bestimmtheitsmass nach vorgegebenen Bereich
Bestimmten Bereich anhand Zeilenabgabe kopieren	Bereich löschen
Array - Index außerhalb des gültigen Bereichs	zoom auf Druckbereichsbreite anpassen
Bereich syncronisieren II	Zeilenbereich auf Tabelle übertragen
Druchbereiche auf eine Seite	Definitionsbereich
Bereich von rechts nach links auslesen?	Namen definieren für bestimmten Bereich
Nur einen Eintrag im Bereich zulassen	Kommentar in erste zelle einess Bereiches
bedingte Formatierung für zellenbereich	Summewenn mit abhängigen Bereichen
Bereiche in separates sheet	Summewenn mit abhängigen Bereichen
Absturz bei lokalen Bereichsnamen	Teilbereich einer Zelle einfärben
Abfrage ob Druckbereich zu groß für Seitenbreite	Gruppierten Bereich sperren
Bestimmte Zahlen aus einem Bereich	Bereich nur unter best. Voraussetzg. summieren
Name eine benannten Bereiches finden	Farbigen Rangebereich auswählen
Wert-Suche in Bereich	Bereich als Grafik speichern
Zeile löschen in Bereich	variablen Druckbereich definieren
Wertebereich definieren	Vergleich Datum in CB mit Datum in einem Bereich
Zeilen und Spalten von Bereich markieren	verlinkungen in markiertem bereich erneuern
Differenz zweier Summe im dynamischen Bereich	Zelbereiche(Matrizen) an Variablen zuweisen
Löschen eines Bereiches	Höchsten Wert aus einem Bereich auslesen
bereichsnamen mit indirekt zusammensetzen	Copy - paste von Zellbereich in Tabelle abfangen
per Makro markierten Bereich auslesen	Teilbereich einer Arbeitsmappe speichern
Summenprodukt und Namensbereich	Vorkommen von Werten eines Bereiches zählen
Allgemeine Frage zur Fehlerbehandlung	allgemeine Fragen zu einer Datenbank
Bereiche festlegen / verknüpfen	bestimmten Bereich sortieren