TKSoft-Online

Willkommen, Gast
Benutzername: Passwort: Angemeldet bleiben:

Serienbriefe ohne Word mit RTF2 OCX
(1 Leser) (1) Gast
Alles rund um MS-Access
  • Seite:
  • 1

THEMA: Serienbriefe ohne Word mit RTF2 OCX

Serienbriefe ohne Word mit RTF2 OCX 1 Jahr her #857

  • iman
Hallo Thommy,

diese Lösung von Dir ist wirklich genial.

Ich habe mal eine Frage zum RTF-Control im Bericht. Dieses RTF-Control hat immer dieselbe Höhe, hier im Beispielbericht z.B. 14,868cm.
Jetzt ist mein Text aber z.B. nur 5 Zeilen groß und darunter habe ich im Detailbereich des Berichts noch zusätzliche Felder eingefügt.
Obwohl noch genügend Platz auf der Berichtsseite da ist generiert Access hier eine neue zweite Seite. Das sieht nicht gut aus.
Kann ich bei diesem RTF-Control im Bericht nicht die tatsächlich benötigte Höhe verwenden?
Bei Access-eigenen Feldern kann ich dies z.B. mit "vergrößerbar" oder "verkleinerbar" realisieren.
Ist sowas möglich und wie?

Ciao
iman

Aw: Serienbriefe ohne Word mit RTF2 OCX 1 Jahr her #858

  • TommyK
  • ONLINE
  • Administrator
  • Beiträge: 503
  • Karma: 4
Hallo iman,

eine Lösung gibt es hier:
http://www.access-im-unternehmen.de/135
Gruß TommyK
Letzte Änderung: 1 Jahr her von TommyK.

Aw: Serienbriefe ohne Word mit RTF2 OCX 1 Jahr her #863

  • TommyK
  • ONLINE
  • Administrator
  • Beiträge: 503
  • Karma: 4
Hallo iman,

habe es mal getestet.
Es funktioniert so:
1. Detailbereich auf Vergrößer- und Verkleinerbar auf "Ja" stellen
rtf2.jpg


2. Das RTF2-Control verkleinern

3. Dann im Ereignis des Datailbereiches "Beim Formatieren" schreiben
Private Sub Detailbereich_Format(Cancel As Integer, FormatCount As Integer)
Me!RTF28.Height = Me!RTF28.RTFheight
End Sub


So hat es beim funktioniert.
Gruß TommyK

Aw: Serienbriefe ohne Word mit RTF2 OCX 1 Jahr her #864

  • iman
Hallo TommyK,

bei mir klappt das leider nicht.

Wenn ich eine Person auswähle wird der RTF-Text einmal in der Berichtsansicht angezeigt (korrekt!).
Wähle ich zwei Personen aus, wird der RTF-Text zweimal in der Berichtsvorschau angezeigt. Bei drei Personen dreimal, und so weiter...

Woran kann das liegen?

Ciao
iman

Aw: Serienbriefe ohne Word mit RTF2 OCX 1 Jahr her #865

  • TommyK
  • ONLINE
  • Administrator
  • Beiträge: 503
  • Karma: 4
Moin,

da muss ich nochmal nachschauen.
Melde mich.
Gruß TommyK

Aw: Serienbriefe ohne Word mit RTF2 OCX 1 Jahr her #866

  • TommyK
  • ONLINE
  • Administrator
  • Beiträge: 503
  • Karma: 4
Hallo iman,

setze die Eigenschaft "Neue Seite" des Detailbereiches" auf Vor & Nach.
Dann sollte es klappen.
rtf2_2.jpg
Gruß TommyK

Aw: Serienbriefe ohne Word mit RTF2 OCX 1 Jahr her #867

  • iman
  • OFFLINE
  • Fresh Boarder
  • Beiträge: 2
  • Karma: 0
Hallo TommyK,

super! Das funktioniert nun auch bei mir. Aber das ist es noch nicht nicht ganz.

Unter dem RTF-Control mit nun einer Höhe von 1 cm habe ich noch weitere Textfelder im Detailbereich des Berichts angeordnet.
Jetzt habe ich das Phänomen, dass das RTF-Feld ja deutlich mehr als 1 cm benötigt und die darunter liegenden Textfelder einfach überlagert.

Was muss ich tun damit die Textfelder erst dann angezeigt bzw. angedruckt werden wenn das RTF-Feld vollständig angezeigt wurde?

Grüße
iman

Aw: Serienbriefe ohne Word mit RTF2 OCX 1 Jahr her #868

  • TommyK
  • ONLINE
  • Administrator
  • Beiträge: 503
  • Karma: 4
Hallo iman,

das ist auch recht simpel.
z.B. ein Feld direkt unter dem RTF-Control
Private Sub Detailbereich_Format(Cancel As Integer, FormatCount As Integer)
Me!RTF28.Height = Me!RTF28.RTFheight
Me.txt_Name.Top = Me!RTF28.RTFheight
End Sub

Wobei Du "Me.txt_Name" durch Deinen Feldnamen ersetzen musst.
Gruß TommyK

Aw: Serienbriefe ohne Word mit RTF2 OCX 1 Jahr her #869

  • iman
Hallo TommyK,

hab's versucht und das klappt bei einem Feld prima. Sobald ich ein weiteres Textfeld hinzufüge funktioniert das nicht mehr.
Zuerst soll das RTF-Feld angezeigt werden, dann darunter die drei Textfelder.
Was mache ich falsch?

 
Private Sub Detailbereich_Format(Cancel As Integer, FormatCount As Integer)
Me!RTF28.Height = Me!RTF28.RTFheight
Me.txt1_Name.Top = Me!RTF28.RTFheight
Me.txt2_Name.Top = Me!RTF28.RTFheight
Me.txt3_Name.Top = Me!RTF28.RTFheight
 
End Sub
--------------------------------------------------------------------------------
 
 


Ich habe dann noch eine Verständnisfrage. Was bedeutet eigentlich "RTFheight" hinter "Me!RTF28." ?
Wenn ich "Me!RTF28." eingebe zeigt mir Access diese Eigenschaft nicht an...

Und dann abschließend eine letzte Frage.
Was muss ich eingeben, damit ich ein/mehrere Textfeld/er auch noch vor dem RTF-Feld platzieren kann.

Vielen Dank im Voraus.

Aw: Serienbriefe ohne Word mit RTF2 OCX 1 Jahr her #870

  • TommyK
  • ONLINE
  • Administrator
  • Beiträge: 503
  • Karma: 4
Hallo iman,

Sobald ich ein weiteres Textfeld hinzufüge funktioniert das nicht mehr.
Zuerst soll das RTF-Feld angezeigt werden, dann darunter die drei Textfelder.
Was mache ich falsch?

In diesem Fall muss das nächste Textfeld natürlich weiter nach verschoben werden, also:
 
Private Sub Detailbereich_Format(Cancel As Integer, FormatCount As Integer)
Me!RTF28.Height = Me!RTF28.RTFheight
Me.txt1_Name.Top = Me!RTF28.RTFheight
Me.txt2_Name.Top = Me.txt1_Name.Top + Me.txt1_Name.Height
Me.txt3_Name.Top = Me.txt2_Name.Top + Me.txt2_Name.Height
End Sub
 


Ich habe dann noch eine Verständnisfrage. Was bedeutet eigentlich "RTFheight" hinter "Me!RTF28." ?
Wenn ich "Me!RTF28." eingebe zeigt mir Access diese Eigenschaft nicht an...

Das ist eine Eigenschaft des RTF-Controls. Diese gibt die Höhe des RTF-Textes zurück.
Eigenschaften von ActiveX-Controls werden im VBE nicht angezeigt.
In diesem Beitrag habe ich beschrieben wie es trotzdem geht:
Workshop zur Benutzung SGrid2-Controls unter MS-Access
Dazu kommt das Accessberichte sich auch bei BuildIn-Funktionen mit der Anzeige zurück hält.

Und dann abschließend eine letzte Frage.
Was muss ich eingeben, damit ich ein/mehrere Textfeld/er auch noch vor dem RTF-Feld platzieren kann.

Das ist völlig problemlos. Du setzt einfach Deine Felder vor das RTF, fertig
Gruß TommyK

Aw: Serienbriefe ohne Word mit RTF2 OCX 1 Jahr her #871

  • iman
Hallo TommyK,

super, vielen Dank!

Jetzt passt alles.

Ciao
iman
  • Seite:
  • 1
Moderatoren: TommyK
Ladezeit der Seite: 7.13 Sekunden

Login

Latest Comments

Latest Forum Posts

Mehr »

Download Statistik

41 Kategorien
187 Dateien
173483 Downloads

JoomlaWatch 1.2.11 - Joomla Monitor and Live Stats by Matej Koval