Recent content by chuckcoleman

Thank you both. I added IIf(DatePart("m",Date())>=7,1,2) to the Default of the Combo Box and it worked. Actually, I had tried that before but I wasn't getting the result I wanted because I goofed. I had >=7,1,2 and it should have been >=7,2,1. Thank you again.

Hi, I have a Combo Box that has as it's Row Source only two choices: 1;"Spring Startup";2;"Winterize" The width of the column widths are 0; 1.5, so you will only see Startup or Winterize I have a Text Box called MonthNbr that has as it's control source: =IIf(DatePart("m",Date())<=7,1,2)...

That took a while. Change text box to Plain Text from Rich Text and then use PlainText to address the field with underlying Rich Text. THANK YOU ALL! SOLVED

Well, all it takes is for one simple question to solve a problem. The Text Box was set to Rich Text. I set it to Plain Text and it works. NOW, one of the fields in the text box has it's data stored as Rich Text. How do I deal with that?

Yes. When you run the query, since it's inserting a CR/Lf you have to use the down-arrow to see the results. But yes, you can see the correct data on different lines. Nobody has asked but the text box can grow and can shrink and the section can go and can shrink.

Yes, it can only be a 1, 2 or 3. Your suggestion us essentially what "bastanu" said. Moving the CF/LF to the end of the nested iif statement. I also copied the code, added it to a new field in the reports underling query and used that field as the source for the text box. That didn't work...

Still not working. In your code you have a ")" at the end of the first two iif statements. Removing the two ")" allows it to run, but still no CR/LF. "Appt Time 9:00:00 AM" should be on a new line. Zones 0 should be on a new line. Notes=> Rich Belpedio should be on a new line.

I'm still having a problem. It still doesn't produce a new line with the next field. Here's the modified code: =IIf([Forms]![Work Order Form]![Frame51]=2,"Proposal Nbr: " & [WorkNbr] & Chr(13) & Chr(10),IIf([Forms]![Work Order Form]![Frame51]=1,"Work Order Nbr: " & [WorkNbr] & Chr(13) &...

I have a text box that has the following code in it. After a field, I want a "carriage return and a line feed" to put the next field on a new line. If I leave off the "&" before the +Chr(13)+Chr(10) when I run the report, that text box shows a #Type. If I leave remove the "&" before the...

Here is the code that I finally worked through that works. [SubName] is the name of a field in the forms query. Thank you for your suggestion. Dim fs, cf, strFolder Dim DestPath As String Dim SrcFile As String Dim FileName As String Dim ShowPDF As Boolean Dim...

That's great feedback/input. Thank you.

I realized when I wrote it, after a long day, it could have been written to be more readable. I'll do better next time. Thank you.

Thank you Paul. I was at this too long yesterday and lost sight of what was causing the problem. I added some MsgBox's to the code that worked so I could see what was going on and the problem I had with the code that wasn't working is that I was adding quotation marks before the full path and...

Hi, I have some code that works, but I need to tweak it to create a folder that uses the data in a field as the folder name. Here is the code that works, (Note, ignore the MsgBox entries I've used for testing): Dim fs, cf, strFolder Dim DestPath As String Dim SrcFile As String...

Hi DBG, it's always great to hear from you. I'll look into that. I also Chat'd with a Microsoft sales person because I saw something about a Microsoft Bookings application. Bookings also integrates with SharePoint. How challenging is it to create an online form in a SharePoint site? In the...