Forum Discussion

Jean Robert's avatar
Jean Robert
Copper Contributor
Jul 13, 2018

VBA Refresh Connections : Error 1004 Application-defined or object-defined error

I have a report using Power Query and Power Pivot, that is refreshed using VBA. It worked well for several years ,and since last week the VBA stops in Debug mode on the Refresh method of the connecti...
Macros & VBA
Need Help
JKPieterse's avatar
JKPieterse
Silver Contributor
Jul 13, 2018
If you want us to help, show the code.
  • velu13579's avatar
    velu13579
    Copper Contributor
    Nov 27, 2020
    Sheets("CONSOLIDAT").Cells.ClearContents
    col = Application.WorksheetFunction.CountA(Range("A3", Range("A3").End(xlToRight)))
    Row = Application.WorksheetFunction.CountA(Range("A3", Range("A3").End(xlDown)))
    Sheets("BOA").Activate
    Sheets("BOA").Range("b2:H2").Copy
    Sheets("CONSOLIDAT").Range("A1:E1").PasteSpecial xlPasteValues
    Sheets("BOA").Select
    Sheets("BOA").Range("b3").Select
    Sheets("BOA").Range("b3", Cells(Row, col)).Select

Resources