Sorry guys, with regards to this post basically all I need help with is the VB code to dismiss a msgbox. Any ideas?
Oh yeah, Happy Thanksgiving in advance!
cloh
Last Activity: Dec 7 '07, 02:02 PM
Joined: Jul 9 '07
Location:
-
This is a sample of the "createGlobalcc ys" function - the "other createImpCcys" is similar:
...Code:Public Sub createGlobalCcys(Optional destFolderPath As String) Dim xlapp As Excel.Application Dim fso As New FileSystemObject Dim newFolder As Folder Dim Filename As String Dim gui As Form Dim Date1val As String Dim Date2val As StringLeave a comment:
-
Hey, don't know if this will help (the code is very long and convoluted) but this is where I am trying to "hide" the messagebox...
...Code:Public Sub ProcessGUIClick(gui As Form, Optional destFolderPath As String) Dim fdialog As FileDialog Dim result As Integer Dim gui As Form Set gui = Form_LocbyCcy Set fdialog = Application.FileDialog(msoFileDialogFolderPicker)Leave a comment:
-
Programmatically clicking "ok" on message box
Hi all, I am using Access to grab some data from a database and plot a graph in Excel. When I do this, there is a message box in Excel that pop ups with an initialization error, that asks me to click ok - however the data that I want is already in the worksheet.
Is there a way to automate the "ok" so that I don't need click it every time I generate one of these sheets? I generate 13 at a time. I have tried the
... -
Error 440 when running form in Access
I have a form in Access, that has been working fine. But today when I try it, I get an error. The message is:
440: Method 'Run' of object '_Application'' failed
Does anyone know what this means, and what I do about it? When I run other forms, I don't get this error. Thanks, guys! -
I open an Excel application and just paste the data that I generated from the Access SQL Query...Leave a comment:
-
Thanks for replying, FishVal. I got around it by looping through the elements in the table instead (do until XXX.EOF etc) so it seems to work, but in a roundabout way.Leave a comment:
-
Selecting one field in an Access table
Hey all, I have a table in Access with 13 rows and 2 columns. The first column has numbers 1 to 13 in ascending order, and the second column has three-letter codes that correspond to each number, like so:
ID_number Code
1 ARS
2 CAD
In VB, I have a loop that generates a bunch of Excel files, so my loop goes for i = 1 to 13. I would like to be able... -
That worked! Thank you (yet again)!Leave a comment:
-
Combining Format() and Round() for time
I have a query in Access where I want the time displayed in hh:mm format. So I used the function:
TimeStamp: Format([REPORT_START_TI ME],"Short Time")
Now, I want to round the minutes to the nearest 5 minutes... can someone please show me how to do this? I think I need to use the Round() function somehow, but I don't know how to combine it with Format()... when I try, I get an error message that says "wrong... -
I've tried using the crosstab query.. but it takes a really long time to run and more often than not I get an error message that says something like "snapshot is too old".
I know the crosstab query should work in theory because I've seen other queries in a similar format... does anyone have any idea on how to speed the query up? I've looked online, but other than telling me to specify the column headings (which I have done)...Leave a comment:
-
Manipulating Rows In Access query
I have a pre-written Access query and one of the resulting columns is listed in this format:
A
B
C
A
B
C
A
B
How can I modify my query to show the results in that colums in this format:
A B C
A B C
A B
Please let me know if this is too abstract, but I just need some... -
Code to export Access records to Excel
I have a problem, and I don't really know where to start.
I have a SQL query in Access that gives me a large recordset. I would like to "transfer" the entire recordset to a worksheet in Excel. Is this possible? I would like the format to be exactly the same as the SQL query. Could someone please point me in the right direction? Thanks in advance. -
Yup, you're right. I've tried modifying border style, width and color but none of these seem to work... when I change the border width the button "moves" as though the border is thicker, but it's still invisible. And any color changes I make just changes the color of the button to black.Leave a comment:
-
Change color of radio button
Hi all,
Does anyone know if it is possible to change the color of a radio button in a form? Changing either the color of the border or the dot would work for me - I just need it to stand out from the background of the form and I would rather not change the form color. Thanks in advance! -
Getting index of open workbook
In my code for a form in Access, I open an Excel workbook. Is there a way to return the index number of that open workbook so I can use it in "Workbooks(inde x).Sheet(#) etc? I need this to be as general as possible so that I can open a bunch of workbooks one after the other.
At the moment I just make sure all instances of Excel are closed, then I run the form so that the index of the first workbook is 1... but I cannot expect... -
FishVal, what would i do without you? I used the sample code as a template and modified my code to match what I wanted and it now works! I've attached it at the bottom in case anyone has a similar problem. Thank you SO much!
...Code:Function Finder(DateSelect As String, sheetindex As Integer) As Integer Dim egg As String Dim colval As Integer Dim xlapp As excel.Application Dim xlbook As excel.WorkbookLeave a comment:
-
You're right, FishVal... the problem still exists... this is the code as it stands and the same error still appears. I'm not quite sure why...
...Code:Function Finder(DateSelect As String) As Integer Dim egg As String Dim colval As Integer Dim xlapp As excel.Application Dim xlbook As excel.Workbook Dim xlsheet As excel.Worksheet Dim xlrange As excel.range 'Dim xlcellLeave a comment:
-
actually nevermind! as soon as i took away the "xlsheet" from line 16 my code worked... but if you can explain it to me, then at least i'll learn something! :-)Leave a comment:
-
Hi FishVal,
You're right of course. Thanks for being patient with this newbie :-)
I tried to reference the properties using the Excel.Applicati on object like you said... I still have a problem with the "Cells" property. My code is as shown below. All I want is to search for the string egg in the first row of each worksheet.
...Code:Function Finder(DateSelect As String) As Integer Dim egg AsLeave a comment:
No activity results to display
Leave a comment: