Search and assign by criteria and create new content with custom pattern

[pomper]

Hello

I have reference numbers list that is assigned to different categories and subcategories. Number "1" links ref # to its categories and subcategories as you can see on attached image.
How to write VBA code that assignes different categories and subcategories to its ref # according to the following pattern below with slash and comma:

ref #	ee2233
categories	main-category/subcategory,main-category-y/sub-category-y

Sub categories()

lastrow = ThisWorkbook.Sheets("categories").Cells(Rows.Count, 1).End(xlUp).Row

For x = 4 To lastrow
    For y = 4 To 10
    
    If Range(Cells(b & 4, b & 4), Cells(j & lastrow, j10) = 1 Then
    

    
    Next y
Next x


End Sub

1z4h8xf.jpg