HERBERS Excel-Forum - die Beispiele

Thema: Buchstabenindex des Arbeitsblattes mit der Fundzelle

Home

Gruppe

UDF

Problem

Die benutzerdefinierte Funktion in Spalte F soll einen Buchstabenindex für das Blatt liefern, in dem der Name aus Spalte A gefunden wird.

Lösung
Geben Sie die nachfolgende benutzerdefinierte Funktion in ein Standardmodul ein.
StandardModule: Modul1

Function GetGroup(sName As String) As String
   Dim vRow As Variant
   Dim iWks As Integer, iCounter As Integer
   iCounter = Application.Caller.Parent.Index + 1
   For iWks = iCounter To Worksheets.Count
      vRow = Application.Match(sName, Worksheets(iWks).Columns(1), 0)
      If Not IsError(vRow) Then
         GetGroup = Chr(65 + iWks - iCounter)
         Exit Function
      End If
   Next iWks
   GetGroup = "Nicht gefunden"
End Function

Beiträge aus dem Excel-Forum zu den Themen UDF und Arbeitsblatt

Excel Arbeitsblatt verkleinern/vergrößern Arbeitsblatt schützen Kommentare aber noch möglich
Arbeitsblatt speichern Lohnsteuerberechnung (UDF, XLM-Datei, Webabfrage)
Arbeitsblatt als E-Mail versenden Arbeitsblattname in Zelle anzeigen
Arbeitsblatt in neuer Arbeitsmappe speichern Einfügen v. Werten in ein anderes Arbeitsblatt
Ergebnis UDF ändert, wenn Tabelle deaktiviert wird UDF soll nicht auf Daten anderer Dateien zugreifen
Namen von Arbeitsblatt in Zelle übernehmen Arbeitsblatt schützen
vor Ausführung einer UDF Zwischenspeicher "retten& UDF - Argument ohne " " übergeben möglic
Dateneingabe u. Arbeitsblatt kopieren Hyperlink auf Bereich in Arbeitsblatt
Ereignis Arbeitsblatt sperren abfangen Zugriff auf ein Arbeitsblatt per Kennwort
VBA-Code von einem Arbeitsblatt ins nächste ausfüh Arbeitsblatt ohne Select speichern
wenn arbeitsblatt vorhanden makro ausführen wenn arbeitsblatt vorhanden makro ausführen
"Seite einrichten" eines Arbeitsblattes übern Scrollen im Arbeitsblatt bei Formelbearbeitung
Neue Daten in ein anderes Arbeitsblatt übertragen Arbeitsblatt als rtf-Datei abspeichern - Wie?
Daten aus anderem Arbeitsblatt suchen und einfügen bestehendes Problem Arbeitsblatt erstellen
Arbeitsblattname in ein Feld schreiben Arbeitsblattwechsel durch Formular unterbinden
Neues Arbeitsblatt erstellen, falls nicht vorhande Arbeitsmappe öffnen, Arbeitsblatt suchen, Text ein
Ansicht nach Arbeitsblatt wechsel Combobox abhängig von offenem Arbeitsblatt
combobox rowsource aus anderem arbeitsblatt Automatisches Speichern einer Arbeitsblatt-Kopie
UDF- Beschreibung Checkbox in Arbeitsblatt
Zellen in neues Arbeitsblatt kopieren Indirekt - Funktion für anderes Arbeitsblatt
Berechnungsdauer einer UDF messen Übergabe eines Arbeitsblattes VBA
Arbeitsblattliste-Hyperlinks erstellen-Formatieren Arbeitsblatt-Menüleiste ausgeblendet
Macro nur auf jeweiligem Arbeitsblatt Archivieren externer Dateien in Arbeitsblatt
Arbeitsblatt activesheet.name im arbeitsblatt
Arbeitsblatt kopieren mit Namensbezügen