Answer Questions
Sailu Error handling problem
Hi - i have an end of month routine that will run - however it brings up error 3021: no current record. this occurs if the user presses the command button where they have not entered any activity that is greater than the 'datelastsubmitted' date because the form loads with the following code: Private Sub Form_Load() Me!officer.SetFocus officer.Value = loginname Me.submit.Enabled = False Dim rsdbase As Database Dim rstemp As Recordset Set rsdbase = CurrentDb Set rstemp = rsdbase.OpenRecordset("SELECT SUM(activityhours)AS [availablehours] FROM [qryavailablehours]WHERE [loginname] ='" & CStr(Me.officer.Value) & "'") With rstemp .MoveFirst Me.availablehours = Format(Nz(!availablehours, ...Show All
fiddlesticks personalized command bar disappears when minimizing excel
This is my first message in this forum, so please be patient. I have programmed a makro for an excel workbook. one part of this makro creates a command bar. when the excel workbook is started i make all the regular command bars disappear, only mine is left. Works wonderful. Well, i have put a button into my command bar to minimize the application. However, when i restore the workbook again from the windows taskbar, my commandbar is vanished, and the normal command bars (like standard and format and also the formula bar) are suddenly there. The command bar is still there but not enabled/visible. The problem exists on many computers and also on differnet excel versions i tried (97, 2000, xp) I do not know if that is a bug or not. Now is it p ...Show All
rach.xXx Observation AND Request
I have been a member of the forum for a month now and have enjoyed trying to help people with their queries. As with most coding there is always more than one way to solve a problem. I also realise that people may not be clicking the "answer" option anticipating a "better" answer may come, this is fine but please reply to a post to let all concerned know whether the suggestion has worked or not. if it has NOT worked then I will know not to suggest that again! If I have upset anyone with my comment then I apologise in advance. ChasAA Derek, Thanks you for your kind words and advice. I hope to remain a participating member, I am enjoyng every minute of it and learning too!. ...Show All
Stu_R MS Office document and image writer print driver
Besides removing this feature from Office during setup, is there a process to remove this virtual printer from 300 users with roaming profiles on an active directory network We are having an issue with this printer assuming the "default printer" selection for our users. As a work around we have changed their default printer, but after they reboot or log off / on it has defaulted back to the MS Ofc doc and image writer printer. A little bit different problem here. I was using this Microsoft Document Imaging Writer port (virtual printer) for quite some time to print what ever screen/file into a image file (mdi/tif format). This virtual printer was missing from the printer folder without I noticed ...Show All
wencey How to fill worksheets with HTML
Hi guys, I have a workbook which holds approx 5 worksheets, every sheet is a result from a transformations (XSLT). I've written a vba code that turns this transformations in html outpurs, now I'm desperally wondering to distribute every html result in each different sheet. Maybe I'm probably clutching at straws but, if you don't ask you don't get. In my VBA this string (sHTML) gets the transformation XSLT in an HTML format sHTML = xmlDoc.transformNode(xslDoc) I already tried this Application.Goto Plan1 ActiveCell.Value = sHTML ...and this Plan1.Range("A1", "E10") = sHTML But nothing fills this HTML output in one of my worksheet. Will be this impossible to do I just ha ...Show All
Ben Santiago Problem while loading macro in Powerpoint2007
Hi, I am trying to load a macro to Powerpoint 2007. I have created a dll called HelpMe , in that dll , i create a custom menu command under tools Menu.The piece of code is Public Function test(oAppl As Object) Dim NewMenu As CommandBarControl Set cWindowMenu = oAppl.CommandBars.FindControl(Id:=30007) If cWindowMenu Is Nothing Then MsgBox "Something wrong while loading" Else Set NewMenu = cWindowMenu.Controls.Add(Type:=msoControlButton, Before:=2, Temporary:=True) NewMenu.Caption = "pepsi" End If End Function this dll is being referred by my macro called dest.ppa(template) where i call this test function.When powerpoint is started after loading this macro,it gives me message "somethi ...Show All
Timski72 Outlook Contacts
I have a load of contacts in Outlook, however when i go to send a mail none of them come up. Therefore i have to copy and paste them when i am writing a new mail. I have checked that the contacts folder is selected. This is a works email system, the Global address list using Exchange works fine but my personal one doesn't. Can anyone help I found that if you go to the CONTACTS tab and right click on the "contacts" in the top left hand menu pane you can change the properties. Within the properties is a tab "Outlook Address Book". Make sure this is ticked and you can go to your "new mail" and you can now see your personal addresses as well as the global address book.!! ...Show All
TheVisual Can't open regedit
Hai.... Why if I want open regedit (run>regedit), and then show message error like that The application failed to initialize properly (0xc0000005) Please anybody help me... Jebat Thanks The dutch version would be the same globally. I am wondering if you click start- then run- then type in regedit if you are using capital letters instead of lower case. For example Type in REGEDIT that's all, no exe or period. If it's still not working there are other ways to open regedit, especially if you are running XP pro. I need to know why you want to get into regedit. Is the reason because you are getting error messages when you try to install a new program If so, t ...Show All
venp Office 2007 integration?
I want my application talks to MS Office Outlook 2007 and Project 2007, e.g. get email or contacts from outlook, add new contacts into Outlook, create new project im my app and insert into MS Project as a new project. How can i do this plz help ...Show All
Mark Macumber RunTime Error '13' Type Mismatch
Hey, I have thsi code that I just cannot figure out. Anyone have any ideas why I'm getting a RunTime Error '13' Type Mismatch Here is the VB code: Dim CommunityMapTable() As Byte (Global Variable) Private Sub LoadCommunityCombobox() Dim I, J CmbCommunityDescription.Clear ReDim CommunityMapTable(CommunityLookupRec.CommunityCount) J = 0 I = 0 While I < Val(CommunityLookupRec.CommunityCount) If Trim(CommunityLookupRec.CommunityEntry(I).CommunityDesc) <> "" Then CmbCommunityDescription.AddItem Trim(CommunityLookupRec.CommunityEntry(I).CommunityDesc) CommunityMapTable(J) = CommunityLookupRec.CommunityEntry(I).Community J = J + 1 End If I = I + 1 Wend CmbCommunityDesc ...Show All
Tryst Deleting Macro
I want to delete the macro recorded in my excel file but the "delete" button is disabled. Is there another way to delete all macros thanks... Hi Your macros will have been recorded in a module. Right click the module and select remove module, say no to export unless you want to save the code to a file. ...Show All
SekharPC RunTime Error 3704 Loading Recordset from Stored Procedure
I am attempting to load a recordset generated by an SQL stored procedure (no parameters) into Excel using VBA. When my code hits the last line, highlighted below, a "RunTime Error 3704: Application-Defined or Object-Defined Error" error occurs. Any ideas Dim RSData2 As ADODB.Recordset Dim DBConn As New ADODB.Connection Const stADO = "Provider=SQLOLEDB.1;Integrated Security=SSPI;" & _ "Initial Catalog=PennTel_Core_Demo;" & _ "Data Source=172.17.9.44" stSQL = "aaa_WPAHS1" Set RSData2 = New ADODB.Recordset 'On Error GoTo Cleanup Call RSData2.Open(stSQL, stADO, CursorTypeEnum.adOpenForwardOnly, LockTypeEnum.adLockReadOnly, CommandTypeE ...Show All
boulderbum Get Excel Sheet Names
Hi: I am trying to connect an Excel file and get all sheet names in the file. When using ADO.Net, the sheet names contain letters "$, or ' " around the sheet name, not getting the exact sheet name. I wonder why. I am also trying to get sheet names by using Excel as a Com object in VB.Net, like: myExcel =CreateObject("Excel.Application") myWorkBook=myExcel.WorkBook.Open("my Excel File") For i = 1 to myWorkBook.Sheets.Count myTableName(i) = myWorkBook.Sheets.Item(i).ToString Next But the code does not work. Does anyone know how Thanks. 焦先生, Glad I was able to help. ~ duck thing jiao wrote: Hi: I am also trying to get sheet names by using Exc ...Show All
Brian.Nelson Limitations of business scorecard manager
As I am considering buying Business scorecard manager soon, and since it is an expensive piece of software I would appreciate someone either confirming the issues I am having... or correcting me if I am wrong. If i can get these issues sorted out then Microsoft, you defintely have a sale! Firstly, Am I right in thinking business scorecard manager does not work with more than one dimension attribute from a dimension For example, if I take the time hierarchy to be a year - month hierarchy from a dimension and put that in the column members of a dimensioned scorecard, and I add the branch attribute, from the same dimension, to the row members (so that I would have the data divided up into the different branches down the left hand side ...Show All
AllahIsGook Search (e.g. Windows Desktop Search) for specific words in VBA code
