Automatically copy text to another sheet that contains data from formulas

Drizz22 · Apr 6th 2020

I hope I can explain this question clearly - apologies for the amateur hour. I've attached an example of the spreadsheet for clearer reference.

Is there VBA code that will take data from one sheet that is created by formulas ("Budget Use Only") and automatically paste it as TEXT to a separate sheet ("Upload - Budget Use Only")? I need it automatically transferred as text as it will be an upload into another software. I'd like it to paste open-ended (if possible) so no matter how much is entered on the other sheets it will continue (if not able, at least 500 rows as a range).

ArdusPetus · Apr 6th 2020

Hi,

Code

Sub CopyBUO()
    Dim rngSource As Range, rngDest As Range
    Worksheets("Budget Use Only").Activate
    Set rngSource = [A1].CurrentRegion.Resize([a:a].Find("", , xlValues, xlWhole, xlByColumns).Row - 1)
    Set rngDest = Worksheets("Upload - Budget Use Only").[A1].Resize(rngSource.Rows.Count, rngSource.Columns.Count)
    rngDest.Value = rngSource.Value
    rngDest.Worksheet.Activate
End Sub

Budget Adjustment Template (VBA) v1.0.xlsm

HTH

--

AP

Drizz22 · Apr 7th 2020

Ardus! You're the BEST! Bless you! Thanks

Automatically copy text to another sheet that contains data from formulas

Participate now!

Share