PDA

View Full Version : Run-Time Error 13



SonaKol
07-03-2019, 10:27 PM
Hi All,

I am getting "Run-Time error 13" error when i click on "Open Form" button. Any one can help me how to resolve the issue

Paul_Hossler
07-03-2019, 11:18 PM
At a guess, change the XXXXXXXXXXXXX row to column A



'find last data row from database
iRow = ws.Cells(Rows.Count, 1).End(xlUp).Row ' Column A

' iRow = ws.Cells(Rows.Count, 3).End(xlUp).Row XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

Rob342
07-03-2019, 11:50 PM
Cannot see vba code Whats the password ?????
If we can't see the code how do you expect it to get solved ?

ashleyuk1984
07-04-2019, 01:19 AM
Just hack the password :) It's easy.

Under 'userform_activate' you have:

Me.txtSlNo2.Value = ws.Cells(iRow, 1).Value + 1

I guess you want this instead.

Me.txtSlNo2.Value = ws.Cells(iRow, 1 + 1).Value

Changing this value allows the userform to open, and doesn't result in 'Run-Time Error 13'

Paul_Hossler
07-04-2019, 06:52 AM
Just hack the password :) It's easy.


We don't talk about hacking and cracking passwords here

http://www.vbaexpress.com/forum/faq.php?faq=psting_faq_item#faq_hack_faq_item