Importing Multiple Sheets into One Master Sheet GoogleSheets

mgoldie1

New Member
II am trying to extract all data that has dates in Col 1 from multiple sheets to one master. I would also like to make that master sheet in date order and have it auto sync whenever I add anything to any of the sheets. I tried to follow a video, but it didn't work. Here's the formula I was using::

=QUERY({PlayMGM!A5:K;SugarHouseNJ!A5:K;'Bet365'!A5:K;SugarHousePA!A5:K;FanDuel!A5:K;Caesars!A5:K;'888'!A5:K;PointsBet!A5:K;'Hard Rock'!A5:K;'Rivers Casino'!A5:K;'Bet America'!A5:K;'Borgata Sports'!A5:K;'William Hill'!A5:K},"select * where Col1 is not null*,0).

Unfortunately, I got an error and can't figure out how to fix it (Unable to parse query string for Function QUERY parameter 2: PARSE_ERROR: Encountered " "*" "* "" at line 1, column 32. Was expecting one of: <EOF> "group" ... "pivot" ... "order" ... "skipping" ... "limit" ... "offset" ... "label" ... "format" ... "options" ... "and" ... "or" ...)

Any suggestions?
 

Logit

Well-known Member
Re: Importing Multiple Sheets into One Master Sheet

.
Your request begins with searching for DATES in Col A. Then you begin describing TEXT in Col A. ???

The following macro (presuming you can utilize a macro in your project vs a formula) will search each sheet in the workbook / Col A for
DATES. If a DATE is found in any cell in Col A, it will copy the entire row and paste it in Sheet 1 to the next empty row.

Keep in mind, if any cells in the various sheets (in Col A) have only a number - even if it isn't a DATE - this macro will copy those rows also.
So this macro is also presuming non of the Col A cells in all the sheets will contain a number only.

Code:
Option Explicit


Sub test()
    
Dim Rws As Long, Rng As Range, ws As Worksheet, sh As Worksheet, c As Range, x As Integer
    Set ws = Worksheets("Sheet1")  'specify sheet name here to paste to
    Set sh = ActiveSheet
    x = 2   'begins pasting in Sheet1 on row 2
    Application.ScreenUpdating = 0
    For Each sh In Sheets
        If sh.Name <> ws.Name Then
            With sh
                Rws = .Cells(Rows.Count, "A").End(xlUp).Row 'searches Col A all sheets
                Set Rng = .Range(.Cells(2, "A"), .Cells(Rws, "A"))
                For Each c In Rng.Cells
                    If IsDate(c.Value) Then    'searches for DATE values
                        c.EntireRow.Copy
                        ws.Range("A" & x).PasteSpecial Paste:=xlValues
                        x = x + 1
                    End If
                Next c
            End With
        End If
    Next sh
ws.Range("A1").Select
    
End Sub
 

mgoldie1

New Member
Re: Importing Multiple Sheets into One Master Sheet

Thanks for the reply. I'm not too knowledgeable with macros. And, I'm trying to run this in google sheets (I was hoping that excel and google were similar enough).

Also, Col 1 is either is blank or has dates. The rows that have dates are the ones I want transferred over. Blank cells in Col 1 should be ignored, along with their corresponding rows.

Any other suggestions? Thanks.
 

Logit

Well-known Member
Re: Importing Multiple Sheets into One Master Sheet

.
Sorry .. I am not familiar with Google Sheets. There are some differences. Hopefully another volunteer can assist.
 

Some videos you may like

This Week's Hot Topics

  • Get External Data (long shot question!)
    This is likely a long shot but I am wondering if it is at all possible for Excel to somehow 'change' the contents of a URL that is being linked to...
  • Importing multiple excel files into one spreadsheet
    Hi, I'm trying to import multiple excel files (with the same format into a single spreadsheet) so that each day's file is listed underneath the...
  • Cell Formatting
    Good Morning, I need to format a few different cells in the following manners: A1 has to always add a colon (:) after whatever is typed in by a...
  • How to copy multiple rows using If
    Hi all, I'm very new to VBA and have written this simple code to copy certain cells if a certain cell within that row contains any data. I need...
  • Workbook_Change stopped working !
    I am working on an app to speed up & automate processing of Credit Cards statements. After data is input from a CSV file, it is presented to the...
  • VBA If statement
    Dear All, I have two dates, where I'd like a message box to pop, if the dates are between this criteria. [CODE] sDate1 = #10/1/2019#...
Top