Search results

ended up working, I had to "compile" project. great post!

I've been using the ribbon button and only have a 2007 & 2010 office install on other computers. How would I use the toolbar in word 2007 as I've been usng the ribbon???

I created my message, added my fields, saved my doc as a macro enabled file, saved the macro code in post exactly as in msowrdocs->thisdocument. enabled all macros via office->word options -> trust center,,,, used both <<sub>> & <sub> and nothing.

I pasted the code and its not working for me in word 2007, but, I'm also not using the task pane, just the ribbon. please help!. I'm using an excel data souce and want to use a certain column for the subject of the word-outlook mail merge

the statements work, issue was the table was missing the column

also tried it like this DoCmd.RunSQL " delete from filterM where [product details] not like '*scrap*' "

I've used like clauses before without a problem in other sql statements,,, wondering why these prompt me to enter a parameter for filterm.prod details DoCmd.RunSQL " delete from filterM where filterm.[product details] not like '*scrap*' " DoCmd.RunSQL " delete from filterM where...

Let me clarify, when I ran a "select... into" query in VBA "from" a linked odbc table, it created an MS access table on the frontend, not the backend like I wanted it to. Is it possible? How? From VBA ....

I also agree, but besides the relink code, I can imagine there be a case where you can manipulate data better with vba. How can you manage to create a table on the backend, (i.e. mysql) with say a typical select into statement?

I searched through a few posts here and on the internet to get together code that you can use to alter a backend ODBC with VBA. If you have anything to add, please post. #1. Adding Columns DAO For DAO, addition of columns works something like: Dim db as DAO.Database Dim tDef as DAO.TableDef...

this ended up doing it Dim oldn As String Dim newn As String Dim tbln As String Dim tbl As ADOX.Table Dim cat As New ADOX.Catalog Set cat.ActiveConnection = CurrentProject.Connection tbln = "test" oldn = "dog101" newn = "dog" cat.Tables(tbln).Columns(oldn).Name = newn Set cat =...

Private Sub Command6_Click() 'Create a Catalog object Dim con As New ADODB.Connection con.Open CurrentProject.AccessConnection Dim Cat As New ADOX.Catalog Cat.ActiveConnection = con Dim oldn As String Dim newn As String Dim tbln As String tbln = "test" oldn = "dog101"...

Before I made my first vba app I thought ms access was a remedial. Now I believe its a must for many kinds of professionals including DBA's, for its automation, especially when it comes to normalizing data from flat text files. What else is there that you can use thats as flexible with excel...

How can you accomplish union queries to combine multiple tables of similar structure. this is the union query. I have 3 tables I want to get put into a 4th. SELECT * FROM T1 UNION ALL SELECT * FROM T2 INTO T4 ????????

I am going to remove duplicate company names but not all records have phone, fax and email. For example. company.... phone.... fax .....email abc ......... 123 abc ......... ......... 456 abc ......... ......... ......... abc@abc.com abc ......... 123 def ......... 456 def def def...

Jal, please excuse, I didn't even see your response. I'll be giving your great suggestion a try now.

can anyone spot whats wrong with this line of code mysql = "UPDATE table1 SET TLs=DCount(*,""shipper='"" & shipper & ""' and filename='"" & filename & ""'"")" this is supposed to count duplicate occurances of field shipper & filename in table1 table. I get run-time error '3075': Syntax...

IMO this one is tough one. I have a table with phone & fax data in an address column that I want to put into their separate phone and fax column. To further complicate things the phone comes in a various forms: phone, T , ph, tel., tels., fono. The same issue occurs with fax, i.e. Fax &...

Here is some code I have to remove duplicate occurances of catid & recid in tblcat1_rec table, leaving only 1 entry: mysql = "DELETE FROM tblcat1_rec " mysql = mysql & " WHERE ID <> (SELECT Min(ID) AS MinOfID FROM tblcat1_rec AS Dupe " mysql = mysql & " WHERE (Dupe.catid = tblcat1_rec.catid) "...

Thanks but I don't understand how to execute this statement: Me.ControlName = Replace(strText, vbLf, vbCrLf) Say for instance my table name is "tblrec" and the column is "list"