Search results

Thank you both! That did it! Private Sub Command146_Click() Set dbs = CurrentDb Set rsQuery = dbs.OpenRecordset("Totals by Practice") Set excelapp = CreateObject("Excel.application", "") Dim strSheetName As String strSheetName = Format([attribution month], "mmm-yyyy")...

I'm sorry - this is a little over my head. Can you help with what you mean? Or give me an example? Thanks Gasman!

That seems to be OK - it works if I put in a name, i.e, targetworkbook.Worksheets.Add.Name = "New Sheet Name" It is not liking targetworkbook.Worksheets.Add.Name = [attribution month]

I'm trying to save a query to excel, which I am able to do just fine. I'd like to assign a new tab (worksheet) to the excel sheet. Got that as well. Where I'm struggling is trying to NAME the excel tab/worksheet the name of a field on the form I am running the code on. So if in my form the...

Thank you David! I tried the above. I doesn't seem to like: If .Range("I3:I500").Replace("CHL", "", xlPart, xlByColumns, False)

Thank you David! I tried the above. I doesn't seem to like: If .Range("I3:I500").Replace("CHL", "", xlPart, xlByColumns, False)

So I am taking data from a query "CHL" and pasting it into an Excel file. I got that to work fine. I would also like to then in Column I - remove the wording "CHL" from any cells in that range. (my code in bold below) I'm very new with VBA, so I'm sure I'm missing something obvious... but I...

I have a standard text field in a form. When I type the text, it automatically converts it to ProperCase. (I.e., JRoss becomes Jross.) I know how to format to all upper or lower case, however, I can't for the life of me figure out how to have it read exactly as typed! Thoughts? Michele

Why would some command buttons work on my computer, but not on another on a shared network drive? Command button to open report (written in VBA), and the "Not On List" function works fine on mine, but not on my colleagues. We had IT re-install Office Suite on her computer and still no change...

Ahhhhh... thank you DB guy!

I am trying to update the background color of a field in my sub-form's parent form. ------------- Private Sub Combo23_AfterUpdate() If Me![Status] = "Pending: Waiting for Authorization" Then Me.Parent.OverallStatus.BackColor = QBColor(6) End If End Sub ---------------- It works by...

Got it! I created a sub query with the criteria and then used the formula! Thank you all!

RowNum: DCount("[ID]","[tableName]","[ID]<=" & [ID]) This works, except if I have a criteria in the query, the RowNum is not starting at "1".

Thanks DB Guy. There is a unique ID for each record. Not sure exactly how I would do what you suggested. I tried this in the query but does not accurately work: RowNum: DCount("[ID]","[tableName]","[ID]<=" & [ID])

I can't seem to find an answer to this, if there is one. I am trying to assign a sequential number to each output query row. i.e., ID Name 5 Bob 8 Tom 3 Joe I want: ID Name 1 5 Bob 2 8 Tom 3 3 Joe Has anyone found a way to do this...

In the private sub PopulateCalendar(): 'ADezii 'NOTE: Will work in the UK (United Kingdom) and other European Nations 'strFirstOfMonth = "1/" & Str(intMonth) & Str(intYear) Is this what could be causing my days of week to be off - if I am using this in U.S.? (i.e., my calendar shows...

Hi Gasman, I'm using this calendar tool (I've modified and amplified). Thank you for sharing! (The week starting Monday one). I've noticed though that the day of the weeks are off. (i.e., 2/14/19 is listed in the calendar view as a Tuesday (should be Thursday). Any thoughts on how to modify?

I've used left and mid strings before, but someone can't get a handle on this one! DOE, JANE, MD I'm trying to just get the first name (Jane) (the text between the two commas). Any help would be appreciated! :banghead:

Hi Gasman, I just came across this database template and its wonderful! I started to modify based on my needs, but noticed that the calendar days are off. On the calendar form - for example - Today 2/12 is listed as Sunday. Wouldn't have a clue as to how to modify that. Any thoughts? Thanks...

That did it DBGuy! Thank you both so much!