Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 16:33:24
Worksheets variable
18.04.2024 15:53:31
In Outlook (Exchange) Serientermin erstellen
18.04.2024 15:16:20
VBA Suchen, Kopieren, Einfügen
18.04.2024 15:16:07
Verschieben von Daten um bestimmte Zeilen nach unten
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
652to656
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
652to656
652to656
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Artikel-Nr. in Spalte suchen, Spalten ausblenden

Artikel-Nr. in Spalte suchen, Spalten ausblenden
15.08.2005 16:26:31
Jens
Liebe Excel-Community,
ich habe folgende Frage zu der stark vereinfachten Beispieldatei. Ich hoffe mir kann jemand weiterhelfen.
https://www.herber.de/bbs/user/25650.xls
In der Zelle A1 habe ich mit der Datengültigkeit eine Dropdownliste definiert in der Artikelnummern stehen.
Jetzt möchte ich eine Artikelnummer auswählen z.B. "495"
Diese Artikelnummer muss nun beim drücken der Schaltfläche "Auswahl" im Bereich E1:J1 gesucht werden. (Mein erstes Problem)
Zweites Problem:
Nun befindet sich ja die Artikelnummer 495 in Spalte H. Hier muss also die zugehörige Spalte ausgewählt werden. Für mein Beispiel möchte ich jetzt nur den festen Teil D1 mit dem variablen Teil H1 drucken, d.h. die Spalten dazwischen müssen ausgeblendet werden.
Ausnahme: Suche ich die erste Artikelnummer braucht auch nichts ausgewählt zu werden.
Wäre über eure Hilfe sehr dankbar.
Nette Grüße
Jens Wolfhagen

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Artikel-Nr. in Spalte suchen, Spalten ausblenden
15.08.2005 17:50:36
Boris
Hi Jens,
einmal zum ausblenden, das andere mal zum Wiedereinblenden:
Option Explicit

Sub weg_damit()
Dim i As Integer
i = WorksheetFunction.Match([a1], [b1:iv1], 0) + 1
Application.ScreenUpdating = False
Columns("E:IV").Hidden = True
Columns(i).Hidden = False
Application.ScreenUpdating = True
End Sub



Sub alle_einblenden()
Application.ScreenUpdating = False
Columns("E:IV").Hidden = False
Application.ScreenUpdating = True
End Sub

Grüße Boris
AW: Artikel-Nr. in Spalte suchen, Spalten ausblend
16.08.2005 08:05:35
Jens
Hallo Boris,
vielen Dank für deine Lösung.
Kannst du vielleicht noch was du der zentralen Zeile sagen:
i = WorksheetFunction.Match([a1], [b1:iv1], 0) + 1
Also wenn ich das richtig verstehe speicherst du wohl hier die entsprechende Spaltenzahl in der Variable i. Ganz klar ist mir das aber noch nicht.
[a1] der Inhalt von A1 soll im Bereich [b1:iv] gesucht werden, richtig
Was hat aber die Null hinten zu bedeuten und die + 1?
Nette Grüße
Jens
Anzeige
Vollkommen korrekt gedeutet...
16.08.2005 14:24:41
Boris
Hi Jens,
und das hier: WorksheetFunction.Match([a1], [b1:iv1], 0) + 1
Match ist die englische Bezeichnung für die Funktion VERGLEICH(). Dazu kannst du auch in der Excelhilfe eigentlich alles nachlesen.
Im bereich B1:IV1 wird der Wert aus A1 gesucht - und im Ergebnis eine Zahl zurückgegeben, an wievielter Stelle der Vergleichsmatrix das Suchkriterium gefunden wurde.
Da die Matrix aber in Spalte B beginnt, ist das Ergebnis immer 1 Zahl kleiner als die gewünschte Spalte - daher noch + 1.
Das ,0 steht dafür, dass MATCH nur nach EXAKTER Übereinstimmung sucht. Die Vergleichsmatrix braucht dann auch nicht aufsteigend sortiert zu sein.
Aber wie gesagt: Schau auch mal in die Hilfe.
Grüße Boris
Anzeige

301 Forumthreads zu ähnlichen Themen

In Spalte nach Anzahl eines Begriffs suchen?
Lauren

Hall Leute!
ich will nach einem Begriff, in meinem Fall nach "SUMs" in der Spalte C suchen und wissen wie oft es in der Spalte vorkommt.
Bei Berechnungen funktioniert es mit ZÄHLENWENN ohne Probleme aber wie erhalte ich die "absolute" Zahl?
Vielen Dank für Eure Hilfe!
Grüße
...
19.08.2008 11:08:23
Thread-ID: 1002846
5 Beiträge
Anzeige
Häufigkeit einer Uhrzeit aus einer Spalte
wolfgang

Hallo Leute
Ich habe eine Spalte mit einer menge Uhrzeiten und möchte die Häufigkeit einer Uhrzeit ( wie oft ist eine eintrag vorhanden)zum Beispiel zwischen 08:00 und 17:00!! Ich weiß das für euch sicher ein leichtes ist jemanden wie mir zu helfen!
Schon jetzt besten Dank für eure Mühe...
02.09.2008 15:11:51
Thread-ID: 1006816
2 Beiträge
von Datum bis Datum suchen und Werte in die Spalte
Datum

Hallo liebe Excel-Könner,
ich habe folgendes Problem und finde keine Lösung.
Ich habe in Spalte A von 2006 bis heute Datum stehen, über eine UserForm möche ich in zwei TextBoxen von bis Datum eintragen und in Spalte B in diesem Bereich den WertX.
Ich hoffe Ihr könnt mir helfen!
...
07.09.2008 09:31:20
Thread-ID: 1007931
8 Beiträge
Anzeige
Berechnen von Werten in einer Spalte
Werten

Folgendes Problem:
In der Spalte A möchte ich wissen, wieviel unterschiedliche Werte es gibt.
Wer kann mir helfen.
Danke
Alex
05.10.2008 12:52:00
Thread-ID: 1014231
5 Beiträge
Filtern, gefilterte Daten benutzen, Suchen und Aus
Merle


Hallo alle zusammen,
ich habe ein mittelschweres Problem. Und zwar habe ich hier ein Beispiel:
https://www.herber.de/bbs/user/55986.xls
In 'Tabelle1' sind ganz viele verschiedene Waren (C17:57) hinterlegt. Ich möchte nun, wenn ich eine dieser Waren rausfilter z.B H025, dass da...
13.10.2008 15:48:00
Thread-ID: 1016087
3 Beiträge
Gleiche Eintäge in einer Spalte nacheinander finde
Malcolm_p

Hallo zusammen!
Wenn ich einen bestimmten Eintrag - per VBA - in einer Spalte finden möchte verwende ich der Regel den folgenden Code:
Dim NameSP As Range
Set NameSP = Sheets("Konten").Rows(1).Find( _
What:=Textbox1, _
Lookat:=xlWhole, _
LookIn:=xlValues)
Dim Erfdat...
15.10.2008 23:08:59
Thread-ID: 1016705
5 Beiträge
Suchen und Ersetzen schnelleres Makro
Susi

Hallo liebe Excel-Freunde,
ich habe folgendes kleines Makro.
Sub Suchen_Ersetzen() out = "15200" 'zu ersetzender String in = "43900" 'einzufügender String For Each cell In Selection If cell.HasFormula = True Then cell.Formula = Application.WorksheetFunction.Substitute(cell.Formula, ou...
20.10.2008 12:19:00
Thread-ID: 1017624
17 Beiträge
Doppelte Einträge in einer Spalte farbig markieren
Robert

Hallo,
ich hab eine Tabelle mit riesigem Datenbestand. Mein Problem ist nun, dass doppelte Eintrage, die in einer Spalte vorkommen, farbig markiert werden sollten - und das gleiche bei jeder weiteren Spalte mit Inhalt.
Sollten in einer Spalte doppelte Einträge vorhanden sein, müsste die...
27.10.2008 19:09:00
Thread-ID: 1019713
11 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
8
1
7
5
4
2
4
16
10
2
3
6
8
4
2
3
4
2
15
10
5
1
5
3