Recent content by titan078

Much appreciated. When I have some more time I will post a dummy version just in case anyone else comes across this problem.

Anyway to give you credit besides the rep thing VbaInet?

Thanks a lot! I ended up putting the title in the report header and everything worked! This made it push the contents of the detail section down and gave it the ability to grow as large as it needed to.

on a side not why did you make a query? Just proper practice instead of having access auto do it when you make the form?

Thanks! Its always nice to see how much more organized other people are. The problem i am running into now is that the Text box grows downward. Is there a way to adjust it so that it expands up. There will be text directly below the title line and if the box grows downward it will lay over...

The report will look like the attached letter. We do fundraising "events" Each "event" gets a letter specifically designed for them from data that we enter into the database. So yes i Believe what you are saying is true, but I would pull up only one page at a time using the EventidPk.

Private Sub Report_Load() Dim Length As Integer Length = Len([ParentLetterTitle]) Select Case Length Case Is <= 11 [PTLtxt] = [ParentLetterTitle] [PTLtxt].FontSize = 66 Case 11 To 64 [PTLtxt] = [ParentLetterTitle]...

Ya i opened it in print preview and even printed it to double check. Select case just was not playing nice with the len function. Once i moved the len function out of the select case everything played nicely with each other on the Onload event. (which is nicer cause i am sure that i will have...

The next step is figuring out how to do the title. The problem is that As the text gets bigger and samller it moves arround the page. If the text would align to the bottom of the label or text box i would have no issues, but as the text shrinks it rises to the middle of the text box or label...

got it! Private Sub Report_Load() Dim Length As Integer Length = Len([ParentLetterTitle]) Select Case Length Case Is <= 11 Me.PLTlbl.Caption = [ParentLetterTitle] Me.PLTlbl.FontSize = 66 Case 11 To 64 Me.PLTlbl.Caption =...

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer) Select Case Len([ParentLetterTitle] & "") Case Is <= 11 Me.PLTlbl.Caption = [ParentLetterTitle] Me.PLTlbl.FontSize = 66 Case 11 To 64 Me.PLTlbl.Caption = [ParentLetterTitle]...

no error just does not work.

We work with different Groups and we create a custom letter for them with the name of their group at the top. Example "Miami SHS Basketball presents:" The title length can range form 10 or so characters to 65 or so characters. I am trying to come up with a way to create that title with access...

Thanks! This will definitely be helpful going forward, and i appreciate the welcome. Any ideas one how to accomplish the title the way i would like?

We have a fundraising business and use Access as our do everything database. We currently create customized letters to send to our customers that have their schools or teams name at the top. Currently we do this in MS word with word art. I would like to start creating these letter with Access...