Answer Questions
Juan Dent Using Access XP VBA to post a file to SharePoint
Good afternoon, I've looked high and low for a solution to programatically, through use of VBA in Access XP, post a file to a SharePoint site. I am a "Contributor" and can manually post a file without issue. I tried a straight copy to the the sharepoint directory via VBA, but always get a strange message that says the file already exists. Any assistance would be greatly appreciated. Below is the code I tried without success. FileCopy "C:\Data\Report.xls", " \\sharepoint\sites\ Report.xls " Thank you in advance, Manny Don't use file copy.....Get a clue. You can use Sharepoint Web Services for VBA...it's a library for VBA that le ...Show All
lawrieg Hide/unhide
I have a button that when the user presses the button the program will search an ordered column for values equal to 0 and hide the rows that has values equal to zero. If the rows already are hidden then they shall be revealed by pressing the button. My code is: Sub showHideButton_Klicka() Dim relativCell As Range Dim i As Integer, j As Integer, k As Integer Dim blnFirstFound As Boolean, blnLastFound As Boolean, blnIsHidden As Boolean Set relativCell = Worksheets("Berakning").Cells.Find("Rel.", LookIn:=xlValues) 'hittar forsta och sista cell med varde 0 Do Until IsEmpty(relativCell.Offset(i, 0)) = True Or blnLastFound = True If blnFirstFound = False Then If relativCell.Offset(i, 0) = 0 Then blnFirstFound = True k = i ...Show All
Alexan Sql SELECT query from VBA in Access
I would like to run a select query from within a VBA sub and have the result put into some sort of string. I can't figure out how to do it as dcCmd.RunSQL only accepts action queries. Can you please give me a suggestion on how to do it I want to do the select query in order to turn a customer name into a customer id so that I can have a proper reference to my table of customers from my table of purchases. Purchases come from a text file that I'm processing in VBA. Thank you. Following example from http://groups.google.com/group/microsoft.public.access/browse_thread/thread/1e749029e44e6ad9/7f99792385e3d85c#7f99792385e3d85c made it work for me. Yay! Function GetMailList() Dim MyDB As DAO.Database, MyRec ...Show All
Eddie C opc
I am trying to develop an opc - da client using .net technology. Have gone through the documents on opc and opc client and all, but am still not sure how to implement it, can someone give me a direction on how to start with it The link you posted doesn't work. Post the code in this forum. When i try add an Opc group, i get te following error message: Opc Server add group failed with exception: Unable to cast object of type 'OpcAutomation.OpcServerClass' to type 'OPCAutomation.IOpcGroups' Does anyone help me You can use vb.net or c# with rslinx's COM dll. You just add the reference to RsiOPCAuto.dll to your project and use its class ...Show All
bio4ema How to send parameter from ms access to excel workbook ?
How to send parameter from ms access to excel workbook I 'm developing MS Access application (GUI & Database used VBA programming ), but i sending report to MS Excel template. when user want to view that report .them will click button as open workbook from MS Accecc user interface. system will open workbook & pop-up from wait for user select input, submit and system will receive data from MS Access Database output to that worksheet. And now I need update that appication by select data item from listView from MS Access user interface and sendind some parameter for queries data same listview item to MS Excel template. On workbooks openning VBA will used parameter from MS Access and queries data same parameter from Database ...Show All
CodeCommando Excel 2000, MSAA, Firefox
Hi, I am trying to write a macro to copy data from Mozilla Firefox on to an excel worksheet. I am using MSAA. I find the root UI of firefox and then try to get the child interfaces using AccessibleChildren. The children array has seven elements. All except one, the one I need, returns an IAccessible. The one I need is an empty object and the execution stops at the "case object" bit of the code (shown below). Can you help, please Thanks. Private Sub writeAccessibles(ByVal objAccessible As IAccessible) Dim children() As Variant, tempChild As IAccessible Dim i%, noChildren As Long, noBegotten As Long Accessibledetails objAccessible If objAccessible Is Nothing Then Exit Sub noChildren = objAccessible.accChildCoun ...Show All
canadian_coder How to stop Popup
Hi, All I m creating an Addin to check whether user has not filled any recipient of the Mail. In this case (if user has left all of its recipients blank), I want to send my mails to a specefied email address. I have written the code for it in myOLApp_ItemSend but problem is that when I leave blank all its recipient then a message comes . "There must be at least one name or distribution list in the TO,cc,bcc Box" . and if I fill anyone address then my code executes. I don't want this message and want to execute my code written in myOLApp_ItemSend Procedure. My requirements is that I want to leave blank to,cc,bcc and want to send mail to a default recipient that is given in my code. but when I leave blank to,cc,bcc that message app ...Show All
Sudhakar.hcitek Cell Equal To EXACT Value
Hi all, prob a very simple question for you guys. How do you check if a cell equals an exact value of "Product" I am currently using: Cells(i, 1).Text = "PRODUCT" though this is also picking up any cell which contains the word Product, such as cells which contain the word Production. So how do you check for an exact value What formula are you using to test this equality - Jon ------- Jon Peltier, Microsoft Excel MVP Tutorials and Custom Solutions http://PeltierTech.com _______ During my experience with programming, i found that using the command to convert the value to Lower Cased characters would solve a lot of problems in a search function. Since it w ...Show All
Pål Børseth-Hansen Microsoft Office Document Imaging no longer in Printers Folder, Using XP and Office XP Professional
This problem has been mentioned by many other users (in a different thread subject), so I wanted to start a new thread. I have tried many suggestions, but none have worked for me. My MODI has been a print option for me until just recently. It disappeared from my printers folder. I have repaired, removed, and re-installed Microsoft Office. The MODI will still not appear in the printers folder. Please Help! Problem solved at: http://www.microsoft.com/office/community/en-us/default.mspx query=microsoft+office+document+imaging%2C+&dg=&cat=en-us-office&lang=en&cr=US&pt=3a4e9862-cdce-4bdc-8664-91038e3eb1e9&catlist=&dglist=&ptlist=&exp=&sloc=en-us ...Show All
DagoFlores Help with comma separated values in report
Hi! A bit of a stuck-up. It’s no problem in creating a coma separated fields in .txt kind of file. But I have another problem which is probably simple to manage (not for me though - my brains work 24hrs/day and don’t come up with nothing). I want to show several different values from one field (in query) on the report - now check this - They have to be separated by a comma in one line. If anybody is familiar with the solution just show me the direction and I’ll try to solve it by myself. Thanks in advance This works for me. Option Compare Database Private Sub Odpri_cmrjizafakturo_Click() Dim dbs As Database Dim rs As DAO.Recordset Dim fakture As Form Dim tfakture As String Dim strsql As String Dim firstrec As Boole ...Show All
Thomas Greenleaf Where di I find answers to macros
I am trying to find out how I can create macros. I am want to make them for all programs, desktop navigating, documents etc. Nothing specific. Please help! Oh yeah... why is it so hard to find info on the simple basic stuff Oh, and yeah, I am pretty computer smart but never had a need for macros...until lately! ARRRRGGGG!!!!!!!! Runningwolf wrote: I am trying to find out how I can create macros. I am want to make them for all programs, desktop navigating, documents etc. Nothing specific. Please help! Oh yeah... why is it so hard to find info on the simple basic stuff Oh, and yeah, I am pretty computer smart but never had a need for macros...until lately! ARRRRGGGG!!!!!!!! and I want it ...Show All
mahima call addin's userform
I have creadted a .xla file, it have a userform in it. i have loaded the xla addin. now in my new spreadsheet, through vba maros can i display the userform which is in that .xla file any help or ideas on how can i achive such a thing would be appreciated nrupesh hi there, create a public method in your addin that displays the user form. You can then call this method using... Application.Run ("myAddin.xla!ShowForm") It's important that a) you check that the add in has been installed and b) that your addin does not have any spaces in it's filename, otherwise the Run() method won't be able to find it. Use the Addins("myAddin").Installed = True to determine if the Addin has been installed H ...Show All
Kosar I need help please
In the past 25 minutes my computer has locked up 5 times. When I go in the Event Viewer theres no errors on system, but there is one for application this is the error Product: Windows Operating System Event ID: 1000 Source: Application Error Version: 5.2 Symbolic Name: ER_USERCRASH_LOG Message: Faulting application %1, version %2, faulting module %3, version %4, fault address 0x%5. If anyone can help me with this..I'd appriciate it. This is getting to be very frustrating for me. ...Show All
elvis_is_dead VBA Queston on Formatting Macro
I'm trying to figure out how to create a few handy macros for my job at work. I've done a little VBA programming before, but its been a few years since I've touched it, so I could really use some help. I'm looking to create a host of macros that will cycle through different formatting options. For example, I want to create a macro, link it to cntrl+shift+F that will modify the fill color the following way: cntrl+shift+F ---> when keyed the first time, background fill turns gray (25%) cntrl+shift+F ---> when keyed the second time, fill turns to light blue cntrl+shift+F ---> then light yellow cntrl+shift+F ---> then no fill cntrl+shift+F ---> then gray (25%) again, etc...looping through the options I wa ...Show All
Salvatore Di Fazio Creating MROUND function
Hello, MROUND is a built-in function in Excel that round a number to a specific multiple. eg. =MROUND(21,5) rounds 21 to the nearest multiple of 5, which gives 20. For some reason this function is not available in my Excel (2003) and so i thought it may be useful to write the function myself using VBA. However i'm not very familiar with VBA so can someone please help me to kick start my first VBA function. Thanks! ps. i've found out after that to add the function all i have to do is go Tools --> Add-ins and tick Analysis ToolPak in the dialog box. Hi Option Explicit means that you have to declare all variables you use. It doesn't affect the code in this case, it's just good programming practice. If you are unce ...Show All
