Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1932to1936
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
1932to1936
1932to1936
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Shapes werden nicht angezeigt.

Shapes werden nicht angezeigt.
06.06.2023 07:46:27
Andre

hallo , guten Morgen

ich habe ein kleines Problem

ich hätte gerne wenn in einer Zelle folgender Wert steht, mir ein Shape angezeigt wird.

vorher wurde der Wert in einer Textbox angezeigt und es hat geklappt.

If Textbox4.Text Like "KL 03" Then Shapes("Gruppieren Zweierteilung").Visible = True

hatte es von Textbox auf Range geändert. seitdem klappt es nicht mehr.

If Range("AI38").Text Like "KL 03" Then Shapes("Gruppieren Zweierteilung").Visible = True

was mache ich falsch?

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

Betreff
Datum
Anwender
Anzeige
AW: Shapes werden nicht angezeigt.
06.06.2023 08:40:10
Beverly
Hi Andre,

du schreibst nicht, in welcher Prozedur sich deine Codezeile befindet. Wenn sich der Wert in AI38 durch direkte Eingabe ändert, dann kannst du das Worksheet_Change-Ereignis verwenden:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Cells(1).Address(False, False) = "AI38" Then
        ActiveSheet.Shapes("Gruppieren Zweierteilung").Visible = Target Like "KL 03"
    End If
End Sub
Bis später
Karin


AW: Shapes werden nicht angezeigt.
07.06.2023 07:01:17
Andre
vielen Dank!!

so klappt es jetzt


Anzeige
AW: Shapes werden nicht angezeigt.
06.06.2023 09:34:07
Ulf 

Dim strText As String
strText = ThisWorkbook.Worksheets(1).Range("AI38").Text
ThisWorkbook.Worksheets(1).Shapes("Gruppieren Zweierteilung").Visible = (strText Like "KL 03")
hth

325 Forumthreads zu ähnlichen Themen

Bereich in Bereich ausblenden
Kai

Hallo zusammen,
ich habe ein Tabellenblatt mit dem Bereich: A1:P38
In Abhängigkeit einer Zahl in einer anderen Zelle eines anderen Tabellenblatts, möchte ich Teilbereiche nicht anzeigen lassen, wie z.b. den Bereich: E20:H38
Ein ausblenden von Zeilen, oder Spalten kommt nicht in Frag...
23.10.2008 18:20:00
Thread-ID: 1018769
21 Beiträge
Anzeige
Zeilen u. Spalten in mehrere Bereichen ausblenden
Andreas

Hi Leute,
Ich hab folgende Aufgabe zu bewältigen:
Ich habe eine Excel-Datei mit einigen Arbeitsblättern, in denen in mehreren Bereichen/Tabellen bestimmte Zeilen und Spalten ausgeblendet werden sollen. Hier ein Beispiel-File:
https://www.herber.de/bbs/user/58668.xls
In den Blä...
21.01.2009 19:51:38
Thread-ID: 1042369
5 Beiträge
Gitternetzlinien per Icon ein- und ausblenden
Vega

Hi,
ich habe mir Excel an meinem neuen Arbeitsplatz gerade wieder neu eingerichtet und auch alles soweit wieder hinbekommen. Nur ein Icon in der Menüleiste fehlt mir noch, mit dem ich die Gitternetzlinien ein- und ausblenden kann.
Ich hatte dies ein meiner alten Excel Umgebung in der Sy...
30.03.2009 15:30:18
Thread-ID: 1065324
5 Beiträge
Anzeige
Schaltflächen werden nicht mehr angezeigt
Karsten

Hallo...
bei mir werden die Schaltflächen nicht mehr angezeigt bzw. aus der Formularleiste lassen sich auch keine neuen hinzufügen. Sie scheint deaktiviert zu sein. Ich weiß aber auch nicht, was ich verändert habe.
In DieseArbeitsmappe steht bei mir folgender code:
Private Sub Wo...
21.06.2010 11:14:11
Thread-ID: 1163084
3 Beiträge
Mehrere Spalten eines Bereichs ausblenden
Peter

guten Tag
Im untenstehenden Code blende ich unter anderem auch die Spalten E:J aus (scheint so zu funktionieren).
Nun wollte ich weitere Spalten gleichzeitig ausblenden und habe die entsprechende Zeile wie folgt modifiziert:
.Columns("E:J, L:M, O:R, T:AD, AF:AK").Hidden = True
...
02.07.2012 10:08:24
Thread-ID: 1269596
4 Beiträge
"leere" Spalten und Zeilen in Bereich ausblenden
Andreas

Hallo,
ich kenne mich zwar etwas mit VBA aus und habe viele Codeansätze gefunden, komme jedoch mit keinem richtig zurecht. Meine Aufgabenstellung ist die folgende:
Ich möchte in einem bestimmten Bereich einer Tabelle alle Zeilen sowie alle Spalten ausblenden, die in diesem Bereich kompl...
26.09.2012 21:26:21
Thread-ID: 1279633
5 Beiträge
Werte werden nicht angezeigt
Galvagno

Ausgangslage:
ich hab in Excel2010 eine Exceldatei mit 2 Blättern (Kurzbericht und Layout KB). In Blatt Layout KB wird über eine Formel (=WENN(ISTLEER(Kurzbericht!B18);"";VERKETTEN(Kurzbericht!N18;" ";Kurzbericht!M18)) auf einen Wert im versteckten Blatt Kurzbericht (verbundene Zellen) zuge...
18.01.2013 12:13:38
Thread-ID: 1294936
5 Beiträge
Excel Files werden im Papierkorb nicht angezeigt
Doris

Excel-Files werden nach dem löschen (einfach mit der Entf-Taste) nicht mehr im Papierkorb angezeigt. Wenn man den Papierkorb aber ganz leeren will, wird z.B. angezeigt wollen sie die 13 Objekte löschen, obwohl der Papierkorb laut Ansicht im Explorer leer ist.Bitte um HILFE!
Danke
23.07.2002 16:35:42
Thread-ID: 139607
5 Beiträge
Anzeige

Links zu Excel-Dialogen

TextBox

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
20
4
4
4
4
2
3
4
4
4
4
2
5
1
1
5
10
3
5
5
2
8
2
1
2