Add data to same cell that already has data

[grabrail]

Hi

I have a report spreadsheet, that contains 20 report tabs, each report tab is made up of various drop down choices the inspector needs to complete. On one of these drop downs, if they select "No" as the answer I have a form pops up asking them with a text box that they need to fill in, this can be made up of multiple lines of text.

When they click the submit button, the text they populated is copied to a tab called Summary to one cell "A82" which is a merged cell from "A82" to "H90"

This all works.

However, when I go to the next report tab and do the same, the text is replaced on the summary tab.

How can I append the text from the next report tab to the text already in the cell on the Summary tab.

The code I have for the copying of data is:

  If BlankChk = 0 Then
            Sheets("Summary").Activate
            ActiveSheet.Range("a82").Select
            ActiveCell.Value = Me.priorfaults.Value
        End If

Blankchk is a bit of previous code that checks if the text entry box is empty, if it is it ignores the copy function.

 

[Snakehips]

@grabrail Try like -

 ActiveCell.Value = ActiveCell.Value & "Your choice of separator" & Me.priorfaults.Value

Also, do you really need to select rather than assign directly?

Hope that helps.

 

[grabrail]

@grabrail Try like -

 ActiveCell.Value = ActiveCell.Value & "Your choice of separator" & Me.priorfaults.Value

Also, do you really need to select rather than assign directly?

Hope that helps.

perfect thanks, i had literally just figured this out, well very similarly. The selection part is juts for testing something, while im developing the code, it will be removed eventually