Have a VBAcode:
Want the user to be able to select the variable "entity" by selecting a row in a combobox...
The combobox should have 2 columns with
Entity; Entityname
200 ; Google
201 ; Amazon
202 ; Microsoft
sub opentb()
dim wb1 as workbook
dim wb2 as workbook
set wb1 = activeworkbook
dim myvalue as variant
dim entity as variant
myvalue = inputbox("example: 0219", "which perio should TB b run for")
Range("z5000").value = myvalue
entity = inputbox("Example: 253B", "Which entity should TB be run for")
range("z5001").value = entity
workbooks.open Filenae: "S:\lon" &myvalue & ".xlsx"
set wb2= activeworkbook
sheets(entity).select
range("A1:5000").copy
wb1.activate
range("a1").select
activesheet.paste
wb2.close
end sub
Want the user to be able to select the variable "entity" by selecting a row in a combobox...
The combobox should have 2 columns with
Entity; Entityname
200 ; Google
201 ; Amazon
202 ; Microsoft
sub opentb()
dim wb1 as workbook
dim wb2 as workbook
set wb1 = activeworkbook
dim myvalue as variant
dim entity as variant
myvalue = inputbox("example: 0219", "which perio should TB b run for")
Range("z5000").value = myvalue
entity = inputbox("Example: 253B", "Which entity should TB be run for")
range("z5001").value = entity
workbooks.open Filenae: "S:\lon" &myvalue & ".xlsx"
set wb2= activeworkbook
sheets(entity).select
range("A1:5000").copy
wb1.activate
range("a1").select
activesheet.paste
wb2.close
end sub
