Recent content by OzzieTheOwl

Hi I have written the following vba in Excel 2000, to fill a ComboBox ListFillRange. ActiveSheet.Shapes("ComboBox1").ControlFormat.ListFillRange = "Control!$B$2:$B$" & ControlEndB I am getting the error message Can some enlighten me as to what I am doing wrong? Cheers Barney

Thanks Steve. Got IT Department to sort it out. You help was great to point them in the right direction. Have a star on me. Cheers Barney

Hi. Just had BOXI Enterprise Installed by the IT Department. I was previously using v6.5. When I click on the Export to Repository, or Import From Repository Button, nothing happens. The PC seems to think about it for a second, then does nothing. Is this something to do with the install, or...

PHV Thanks mate, helpful as ever. I thought it must be something simple I had missed. Cheers Barney

Hi I have the following code which is supposed to open up every Excel file in a directory, but it only appears to open up every other file. Can anyone see what I have done wrong? Dim myFiles myFiles = Dir("\\bbuukvirfnp0001\scm\logistics\Costing data\Stock Values " & YearNo & "\Week...

Hi I had a similar issue, I solved it by copying the Office 9 DLL onto the machine, then setting the reference to Office 9 rather than Office 11, but only for that project. Still works fine. And does not default back to 11. Cheers Barney

Just a thought, may be being too simplistic. But are the references the same on all machines? Barney

Thanks PHV Much tidier solution. Have a star Cheers Barney

Hi I have the following code that should be putting a command button into a command bar. Private Sub Workbook_Open() Set cbrGraphs = Application.CommandBars.Add cbrGraphs.Name = "Graph Buttons" cbrGraphs.Position = msoBarTop With cbrGraphsControls Set cbcCreateGraphs =...

PHV Thank you very much, worked perfectly. Have a star on me. Cheers Barney

Hi I am trying to send an email to multiple recipients, the number of recipients could vary each time the macro is run. I have created a loop to get the names, but Outlook doesn't seem to like the multiple names, can anyone help me out? Current Code Below For EmailLoop = 3 To...

Thanks for our help guys. I have solved my own problem. I used AppActivate ("DB Name") And it works perfectly. Cheers Barney

bubba100 Thanks for the response. I have tried that but it still keeps the focus on Outlook, I could be wrong, but I think it may be something to do with Outlook Securtity Warning Message which take the focus away from Access to Outlook.

Current Code As requested Private Sub cmdEmailDriver_Click() Dim o As Outlook.Application Dim mail As mailitem Dim txtDriverPhoneE As String Dim txtAssetRegE As String Dim txtServiceTypeE As String Dim txtGarageE As String Dim txtServiceDateE As String...

I have a routine which sends an email from a form, the problem is that once the email has been sent the focus is still on Outlook, does anyone know how to make the Access DB the focus again? Thanks in Advance Barney