Delete row in two worksheet at same time

[inactiveUser214710]

Hi everyone

I have a userform, with a combobox, and from that I transfer data to a main worksheet(1)-(table),

but some especif data, depending on the kind of it, transfer as well to another worksheet(2).

This works well, but when I want to delete a especific data in determinate row in sheet1 it delete just in sheet 1 and didn't delete in worksheet2.

Are there any solution for this? How to use code vba to do that? Thank you

The code that I use to transfer to sheet2 is: [TABLE] [TR] [TD]Dim rng As Range[/TD] [/TR] [TR] [TD]If cboP.Value = "Stones" Then[/TD] [/TR] [TR] [TD]Set rng = Worksheets("sheet2").Cells(Rows.Count, "c").End(xlUp).Offset(1, 0)[/TD] [/TR] [TR] [TD]rng.Offset(0, 3) = cboDesp.Value[/TD] [/TR] [TR] [TD]rng.Offset(0, 4) = txtvt.Value[/TD] [/TR] [TR] [TD]rng.Offset(0, 5) = txtob.Value[/TD] [/TR] [TR] [TD]End If[/TD] [/TR] [/TABLE]

 

[inactiveUser214710]

Dim rng As Range    
     If cboP.Value = "Stones"  Then    
         Set rng = Worksheets("sheet2").Cells(Rows.Count,    "c").End(xlUp).Offset(1, 0)    
               rng.Offset(0, 3) = cboDesp.Value    
               rng.Offset(0, 4) = txtvt.Value    
               rng.Offset(0, 5) = txtob.Value    
     End If