help me, error '1004'

[ususgoreng]

hi all, i want to ask
i make a vb at excel 2007

Worksheets("Dalam").Activate
Dim sht As Worksheet, look As Worksheet
Dim coldlm As Integer, rowdlm As Integer, no As Integer, sheet As Integer, ow As Integer, rowkm As Integer, hap As Integer, hip As Integer
Dim kg As Range, kgg As Range, oww As Double
Dim own
For ow = 4 To 1243 Step 7
If ow > 11 Then
Worksheets("Dalam").Range("I11:BB16").Copy _
Destination:=Worksheets("Dalam").Cells(ow, 9)
End If
no = Worksheets("Dalam").Cells(ow, 10)
sheet = no - 68
For coldlm = 19 To 24
For rowdlm = 1 To 6
wewq = (Int(rowdlm) + Int(ow) - 1)
oww = hap / 7
own = Int(oww)
rowkm = ow - own * 7
Set kg = Sheets(sheet).Cells(rowkm, coldlm)
If kg > 0.0000001 Then
Set kgg = Worksheets("Dalam").Cells(rowdlm, coldlm)
kgg = kg
End If
Next
Next
Next

i want to make the second line red font into oww = wewq / 7
but everytime i try to oww = wewq / 7 i got error '1004' message
if i don't put wewq at second line, the programs run, but oww = 0, i want
oww = ( rowdlm + ow -1 )

thanks

[royUK]

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code. Posting code without them makes your code hard to read and difficult to be copied for testing. Highlight your code and click the # at the top of your post window. For more information about these and other tags, found here

Your post does not comply with Rule 1 of our Forum RULES. Your post title should accurately and concisely describe your problem, not your anticipated solution. Use terms appropriate to a Google search. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will be addressed according to the OP's experience in the forum: If you have less than 10 posts, expect (and respond to) a request to change your thread title. If you have 10 or more posts, expect your post to be locked, so you can start a new thread with an appropriate title.
To change a Title on your post, click EDIT then Go Advanced and change your title, if 2 days have passed ask a moderator to do it for you.

PLEASE PM WHEN YOU HAVE DONE THIS AND I WILL DELETE THIS POST