Office: (Office 2010) Nachrücken von Bezeichnungs- und Textfeldern

Hi Accessprofis,

ich habe ein kleines optisches Problem in der Darstellung eines UFO's.
Also der Reihe nach: Ich benutze ein UFO in mehreren HFO's. Nun soll bei der Benutzung in einem der HFO's im UFO ein dort nicht benötigtes Bezeichnungs- und Textfeld ausgeblendet werden. Zusätzlich, und hier liegt mein Problem, sollen die rechts stehenden, anderen Felder nachrücken, damit die Lücke der ausgeblendeten Bezeichnungs- und Textfelder geschlossen wird.
Also sinngemäß so, wie wenn ich in der Drogerie eine Dose Haarspray aus dem Regal entnehme und die hinteren Dosen rutschen nach. *biggrin.gif*
Die Darstellung des UFO's ist: Endlosformular in der Ansichtsform "Mehrere Elemente".
Für die Ausblendung der nicht benötigten Bezeichnungs- und Textfelder benutze ich folgenden Code: Code:

Jetzt fehlt mir nur noch der Rest des Codes für das Nachrücken. Bietet Access dafür überhaupt eine Möglichkeit? Hat jemand eine Idee?

Viele Grüße,
Annika

:)

 

Es gibt dazu z.B. die Steuerelement-Eigenschaft "links".
In VBA muss diese jedoch in Twips statt in Zentimeter eingegeben werden.
Ermittle die aktuelle Twips-Einstellung mit Code:

Danach ist ausprobieren angesagt.
Oder hier nachlesen

 

Hi Elmar,

irgendwas klappt nicht, keine Ahnung, warum. *eek.gif*
Ich bin folgendermaßen vorgegangen:
Mit dem Code Code:

bzw. Code:

habe ich zunächst die Ist-Position der beiden zu verschiebenden Elemente ermittelt. Diese beträgt bei beiden Elementen: 3585 Twips.
Danach habe ich o.g. Codes wieder entfernt und folgende Codes an den von gestern geposteten Code gehängt (an die Stelle der 3 Fragezeichen): Code:

Aber die beiden Elemente bewegen sich überhaupt nicht nach links. Dabei habe ich auch den von Dir geposteten Link zur Hilfe genommen.

Viele Grüße
Annika

 

Hallo,
Deine Code liefert Falsch (warum auch immer) und Falsch = 0, also wird nichts verschoben.
Weise den Abstand einer Variablen zu:
Code:

 

Access setzt also die Priorität auf den Vergleich und nicht auf die Rechenoperation. Die Antwort auf Deine Frage ("warum auch immer") wäre auch für mich interessant zu kennen. *wink.gif*

 

Hallo Klaus,

leider tut sich auch bei Deinem Code nichts. Die beiden Felder bewegen sich nicht nach links. *confused.gif*

Viele Grüße
Annika

 

Muss da evtl. noch ein
Code:

an das Ende?

Grüße
Ingoo

 

Hi Ingoo,

das Code:

am Schluss bringt auch nix. Bewegt sich keinen Milimeter.

Viele Grüße
Annika

 

Hallo,
also ich habe meinen obigen Vorschlag getestet, das funktioniert.

Es nutzt auch nichts, wenn Du hier schreibst der Code funktioniert nicht, man müsste schon sehen, wie Du es umgesetzt hast. Du könntest ja etwas falsch haben.
Daher ist es immer erforderlich den Code den man verwendet vollständig zu zeigen, wie sonst soll man da beurteilen. Und kopieren, nicht abschreiben.

 

Zweckmäßig wäre ggf., ein kleines Formularchen incl. Code per Beispiel-DB zu präsentieren.

 

Hallo,

bin wieder da. Hatte gestern leider keine Zeit, eine kleine Beispieldatenbank zu erstellen. Dies habe ich heute Abend nachgeholt. Schaut mal in den Anhang. *Smilie

Bis bald
Annika

 

Hallo,
ich habe nur Access2003 (MDB) entweder konvertieren oder warten.

 

Hi Klaus,

sorry - 2003-er Version liegt bei. *wink.gif*

Bis dann ...
Annika

 

Hallo,

bei mir funktioniert's:

lbl_Ausw und txt_Ausw werden unsichtbar sowie lbl_Dok und txt_Dok werden nach links verschoben, allerdings nach Auskommentierung der Bedingung If...

 

Hi,

also jetzt bin ich total baff! *eek.gif*
Das glaubt mir jetzt keiner! *eek.gif*

Habe heute in der Mittagspause an meinem Arbeitsplatz meine gestern Abend gepostete 2003-er Access-Datei (aus #13) heruntergeladen, um weiterhin Versuche mit dem Code durchzuführen.
Dann war ich perplex: Der Code funktioniert einwandfrei - und zwar so, wie er von mir gepostet wurde. Vorhin habe ich das nochmals bei mir zu Hause probiert, dabei habe ich die selbe Datei wieder aus dem Forum heruntergeladen, diese funktioniert jedoch zu Hause NICHT.

Außerdem funktioniert an meinem Arbeitsplatz die Variante mit den beiden Zeilen aus #3 völlig ohne Probleme! Daheim wieder nicht. *boah

An meinem Arbeitsplatz verwende ich Win Vista und Access 2003, zu Hause Win 7 und Access 2010.

*confused.gif* *confused.gif* *confused.gif*

Verwirrte Grüße
Annika