Duplicate declaration in current scope

[alex17353]

I have this code but the problem is I don't understand what they mean by 'duplicate declaration in current scope and how to fix it

Sheets("tran1").Select
Rows("2:2").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Dim dentry As Long
Range("tran1!a2").Value = Range("sheet1!a11").Value
Range("Tran1!b2").Value = Now
Worksheets(2).Rows(x).Select
Dim x As Integer
x = 0
Do
x = x + 1
Loop Until Range("sheet1!a" & x).Value = Range("sheet1!a11").Value
Range("sheet1!c & x").Value = Range("sheet1!c & x").Value + TextBox2d.Value
Range("Tran1!D2") = TextBox2d.Value
Range("tran1!c2") = Range("sheet1! c & x").Value

 

[VoG]

Do you have this twice?

Dim x As Integer

If so, delete one.

 

[alex17353]

I have it in another userform sheet but the only thing similar on this user form is dim dentry as long in

 

[VoG]

The message means that you have Dimmed the same variable more than once.