My data worksheet ("Sh1") shows information with index number in column C.
e.g. 1, 2, 3, 4.
I have another worksheet ("Sh2") to identify what each number means.
e.g.
Cell A1: 1
Cell B1: manufacturing
How to replace the number in column C of Sh1 with information from column B of Sh2?
This is what I have
'Add information in data form
Application.ScreenUpdating = False
Dim NextRow As Long, Lastrow As Long
Lastrow = Sheets("CustomerMaster").Range("C" & Rows.Count).End(xlUp).Row
NextRow = Lastrow + 1
'If formValidation = True Then
Sheets("CustomerMaster").Cells(NextRow, 1) = Sheets("Customer Master Data Entry").TextID
Sheets("CustomerMaster").Cells(NextRow, 2) = Sheets("Customer Master Data Entry").TextCompany
Sheets("CustomerMaster").Cells(NextRow, 3) = Sheets("Customer Master Data Entry").DropDowns("Drop Down 8").Value
Sheets("CustomerMaster").Cells(NextRow, 4) = Sheets("Customer Master Data Entry").TextRevenue
Sheets("CustomerMaster").Cells(NextRow, 5) = Sheets("Customer Master Data Entry").TextAddress
Sheets("CustomerMaster").Cells(NextRow, 6) = DropDowns("Drop Down 11").Value
Sheets("CustomerMaster").Cells(NextRow, 7) = Sheets("Customer Master Data Entry").TextInitialCust
Sheets("CustomerMaster").Cells(NextRow, 8) = Sheets("Customer Master Data Entry").TextSource
Sheets("CustomerMaster").Cells(NextRow, 9) = Sheets("Customer Master Data Entry").TextEntered
Sheets("CustomerMaster").Cells(NextRow, 10) = DropDowns("Drop Down 21").Value
Sheets("CustomerMaster").Cells(NextRow, 11) = Sheets("Customer Master Data Entry").TextRemarkCust