Thema Datum  Von Nutzer Rating
Antwort
Rot Tabellenname als objekt übergeben
25.09.2006 12:28:09 Pavlo
NotSolved
26.09.2006 13:13:39 Rasta
NotSolved

Ansicht des Beitrags:
Von:
Pavlo		 Datum:
25.09.2006 12:28:09		 Views:
3504		 Rating:
     
Antwort:
  Ja
Thema:
Tabellenname als objekt übergeben
Hallo!
Habe ein Problem, nämlich:
ich habe eine Tabelle mit 2 Spalten definiert.
- in 1.Spalte stehen alle Tabellennamen
- in 2.Spalte Enisen(1) und Nullen (0)
Mein Programm soll: erstens die 2. Spalte nach 1 oder 0 prüfen! Wenn 0 -> dann zu dieser Zelle gehörige linke Zelle (1.Spalte mit Tabellennammen) soll aktiviert sein, das Programm soll erkennen(!), dass da eine Tabellenname steht und die Tabelle mit dieser Name ausblenden!
Wenn 1 -> dann die links stehende Tabellename = diese Tabelle einblenden.
Ich hab schon so etwas geschrieben:

Dim erg As Variant
Dim blatt As Worksheet
Dim zelle As Range

Worksheets("DB-Tabellenrechte").Activate

For Each zelle In ActiveSheet.Range("B:B")
If zelle.Value = "1" Then
zelle.Activate
Set erg = ActiveCell.Offset(0, -1).Value

With erg
.Value = blatt.Name
End With
blatt.visible = True
End If

Next zelle

---Hier kommt die Fehlermeldung "Typ unverträglich" oder "Objektvariable nicht definiert"
WIE KANN ICH MEIN PROBLEM LÖSEN?????

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
Rot Tabellenname als objekt übergeben
25.09.2006 12:28:09 Pavlo
NotSolved
26.09.2006 13:13:39 Rasta
NotSolved