Search results for query: *

Sample to create toolbar on right with four custom button images: Sub Auto_Open() savestate = ActiveWorkbook.Saved On Error Resume Next NumTools = 4 For i = 1 To NumTools pn = "Picture" & Application.Trim(Str(i))...

Well, I figured it out, but don't understand the problem. I changed the table name (F2, type away) changed my code to reference the new (same old) table. Works like a charm. Thanks for the assistance though.

Forgive me, but I haven't quite experienced all the DSN DSN-less connection strings and haven't found what I'm looking for online. Do I increase the timeout settings with the provider (I'm providing with string in global.asa, first foray there) or when I make the connection (provided in...

I'm building a project using an Access db and PWS. A frames page populates two combo boxes with information from two tables. No problem so far. The choices the user makes will build my SQL statement for reporting. I make the connection using an include, Jet 4.0 Provider. My problem is once I...

You can use Application.ScreenUpdating=False to keep the screen from flipping around, if you're selecting sheets, cells, etc. In some instances the process will be faster because the screen doesn't have to be updated. Application.ScreenUpdating=True turns it back on.

Believe I might have found the solution with the self join: SELECT IntrFac.NameID, IntrFac.AccountID, IntrFac_1.AbsAmount, IntrFac_1.Amount, IntrFac.S2KFormat FROM IntrFac INNER JOIN IntrFac AS IntrFac_1 ON (IntrFac.AbsAmount = IntrFac_1.AbsAmount) AND (IntrFac.AccountID = IntrFac_1.NameID) AND...

In an Access97 Db I have the following table: Table:IntrFac NameID,AccountID,AbsAmount,Amount,and S2KFormat Here's sample data: NameID AccountID AbsAmount Amount S2KFormat 4190 3290 536 536 419.0.2991.00.3290 3330 3290 536 536 333.0.2991.00.3290 3290 2100 536...

Thanks for the response. I forgot about DELETE. Once again, thanks.

Only knowing enough to get myself in trouble, I'm trying to delete records from a recordset. I'm writing the code in Excel97 against an Access97 database using an ADO connection. I populate a table with data from one of the Excel worksheets. This data contains certain records that need to be...

Call me a newbie but this is really a good tutorial using ASP pages. Lots of good information on the site as well. http://www.devguru.com/features/tutorials/ADOandASP/adoTutorial.html The tutorial has sample database and the ASP page to go with it.

I'm still learning too. Here's a great link of example code straight from the horse's mouth. http://msdn.microsoft.com/library/default.asp?url=/library/en-us/ado270/htm/mdmscadocodeexamplesinvisualbasic.asp The main ADO page has some good information and the above link...

Figured it out: Sub test() ActiveSheet.OLEObjects("Frame1").Object.OptScott.Value = 1 End Sub

I have a worksheet I'm testing controls with. I can place controls in the worksheet and run code off them but now I want to try something else. I've placed a Microsoft Forms 2.0 Frame on a worksheet. I then added two option buttons to the frame. How do I refer to those option buttons within...

Would something like this work? Aplication.ScreenUpdating=False Windows("mbr.txt").Activate ActiveWorkbook.SaveAs Filename:="C:\Scottr\mbr.dbf", FileFormat:=xlDBF4, _ CreateBackup:=False ActiveWindow.Close Application.ScreenUpdating=True This scenerio could work if run...

I've used this statement to close delimited files that I've opened: Application.DisplayAlerts = False ActiveWorkbook.SaveAs... Windows.Application.ActiveWindow.Close I open a delimited file, do some manipulations then save as a text file. I turn off Alerts so I'm not prompted to save as an...

You could use Application.ScreenUpdating=False so things happen in the background and set it back to True when done. You could record the macro and get the code for SaveAs. The only thing you might have to worry about is how you want things to be controlled; meaning I'm not familiar with .DBF...

Don't know if this will help you, but I pieced together pieces of code from this site to allow me to select a directory, look for all .bmp files in the selected folder and rename them a certain way if a condition was met. http://www.mvps.org/vbnet/index.html?code/fileapi/copyfile.htm I don't...

You can name a Range for the cell that will contain the information you are trying to include in the SaveAs statement. Say C6's contents is "Accounting" I would name the Range C6 as sFileName so I could then say StrCpy1=Range("sFileName") Whatever is in that cell will be...

In your code, you can try Application.ScreenUpdating=False Application.StatusBar = "Opening File X" This should allow you to open files in the 'background' without the screen changing. While screen updating is turned off, I like to use the second line to change the status bar, so I...

sAccount is dimmed as string. sAccount is populated by choosing an account from a combo box on the user form. Once the selection is made, it is stored on a sheet in a named range. When I need to use it, I set sAccount=Range("cmbAccount"). Since it works with short account names, I...