Recent content by mdjks

  1. M

    Excel and SharePoint formulas changing

    I have a spreadsheet posted on SharePoint and its formulas keep changing. I am doing lookups against a SQL query against a fixed data point. the first row is correct but further down the number goes off. I have fixed saved a republished a dozen times. any suggestions?
  2. M

    Debug with no error

    I am getting a debug at the End If right after ActiveWorkbook.Save. I don't have to do any thing but hit F5 and it finishes. Any suggestions? I need to get this to end users in the next few minutes. Using Excel 2013 on Win 8 this is the complete piece of code Private Sub...
  3. M

    Two Ifs no else

    there is no other code and both statements work, depending on which one is listed first.
  4. M

    Two Ifs no else

    Thank you, I tried this method but it does the same thing, populates the first then jumps right back to the top. Pbaldy, that was how I wrote it originally but it jumps back up. I'm just sort of at a loss. Tried this at work using 2013 and at home with 2016
  5. M

    Two Ifs no else

    The code below works but only the first one. If I change the order and step through it will give me the user name. I have been searching the web but I'm not using the right search criteria. Help would be greatly appreciated. Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target...
  6. M

    RefreshAll inconsistancies

    Finally found something to work, see if statements in red Dim xlApp As Object Dim xlWb As Object Set xlApp = CreateObject("Excel.Application") xlApp.DisplayAlerts = False Set xlWb = xlApp.Workbooks.Add("P:\Business Analyst Shared Folder\Business Analysis Tools\Forecast & EG\Flash...
  7. M

    RefreshAll inconsistancies

    Any additional thoughts would be appreciated. I've added DoEvents and more saves and split it into separate buttons. The RefreshAll is still not consistently running. Set xlApp = CreateObject("Excel.Application") xlApp.DisplayAlerts = False Set xlWb = xlApp.Workbooks.Add("P:\Business Analyst...
  8. M

    RefreshAll inconsistancies

    I tried removing it but I ended up with dialogue boxes for save. I did try setting the App to Visible but the RefreshAll Command is still not working 100% of the time.
  9. M

    RefreshAll inconsistancies

    I am trying to use the following code to update seven Excel workbooks. At this point (second file to refresh) I get Runtime error 1004 SaveAs method of workbook class failed. xlWb.SaveAs ("P:\FileLocation\Speciality All Regions Forecast Template.xlsx") I continue the code with F5 and the next...
  10. M

    Compact and Repair another DB from VBA

    worked like a charm in 2010 as well
  11. M

    Illegal function call on Exit Function

    Perfect and simple, thank you very much
  12. M

    Illegal function call on Exit Function

    I have a bit of code to relink tables to a new location. My earlier tests were doing well but once I added a button with a run command I started getting Run-time error 7952 "You made an illegal function call". This occurs at Exit Function. I tried commenting that out and letting it run to End...
  13. M

    Don't want to create two files

    I am exporting an Access query to Excel and formating the workbook but having a problem with Excel opening twice. The formating is working fine. Any suggestions on where I am opening Excel twice would be greatly appreciated. Private Sub btnVACR_Click() Dim uName As String uName =...
  14. M

    Automatic export query to (formatted) Excel

    I am doing exactly that and having a problem with Excel opening twice but the formating is working fine. Any suggestions on where I am opening Excel twice would be greatly appreciated. To get the formatting record a macro of what you want in Excel and use that code within Access. Private Sub...
  15. M

    Search for multiple Values

    Thank you, giant help to us!
Top Bottom