Posts by ArhamRajput

Q. Don't hide the application when developing code. When an error occurs you end up with an invisible instance of Excel running.

I dont know how.

Q. There's no code that I can see to add buttons. Why do you want to add buttons?

I have a sheet where someone has used this loop.

Q. The only code that works efficiently in the workbook is mine and you aren't using it. Your code to change the password only works on one cell!

I know your code is perfect one but i dont know how the code will change password of users and automatically will be add in admin sheet under username.

Q. Why have you changed the layout of the table that stores the passwords?

Because i was trying to create loop as attached sheet has created.

User - Admin

Password - Chuckles1

Unlock Sheet - entity

Unlock VBA - pbarratt6344

I have changed the Userform which is attached below and also trying to change your given code but could not.

I was trying to create a loop if i open the sheet with the username a button is added on each user sheet with named reset password.

When user is change their password then concern user password should be change in admin sheet.

user : shoaib.ali

Pass : shoaib

I was trying to understand your example and add the code to Userform2 for changing the password but could not. Then i thought that and probably if i keep asking questions then you will be annoyed. Thats why i used this one.

Dear Experts,

It is third time when the workbook automatically set the password to protect Workbook structure i do not why it is happening. Please help to resolve the issue.

I did it thank you.

I got it thank you so much

Thank for your efforts but sheet is not getting open via login password.

Thank you, and also thanks for guiding me but before posting here i have tried alot to understand your sheet but could not.

royUK

Your coding is pro and i am beginner cannot understand and modify it. if you can update code in my form i would be really appreciate.

I have made this Userform and want to add password reset code to initiate it but do not know how. please help.

After reset, the new password should be written on "Expense Sheet" under Password head automatically.

username: shoaib1

Password: password

Thank you for help.

Actually there are different issue occurs while making reports. this is why.

Book4 is the right sheet to correct the formula.

Yes combo box is VBA related issue.

Dear Team,

There are two sheets in below attached workbook one is contains formula and second one example/ Result.

I am trying to add three star "***" before and the end of the formula.

the issue is when i enter the date in conditional formatting then it removes the stars at the end of the formula. please resolve the issue.

Please edit this.

sobi_256

Hi, its not working for me even i have changed the data range and sheets name please review it once I have Combox in Sheet names as "Payslip" and Data in sheet names as "Employee Data" which range is "D4:D2000"

After run the code it goes to debug

.AddItem myarr(i) 

Above is debug which was yellow highlited.

Sub arrdta()
Dim myarr As Variant
Dim i As Integer
lrow = Cells(Rows.Count, "B").End(xlUp).Row 'counting rows of column which will be linked to dropdown
myarr = WorksheetFunction.Transpose(Worksheets("Employee Data").Range("B4:B" & lrow).Value)
myarr = srtAZ(myarr)
With Worksheets("PaySlip").OLEObjects("ComboBox1").Object
     For i = LBound(myarr) To UBound(myarr)
     If myarr(i) <> "" Then
     .AddItem myarr(i)
        End If
     Next i
End With
End Sub

Function srtAZ(myarr As Variant)

Dim i As Long
Dim j As Long
Dim stor

For i = LBound(myarr) To UBound(myarr) - 1
    For j = i + 1 To UBound(myarr)
        If UCase(myarr(i)) > UCase(myarr(j)) Then
            stor = myarr(j)
            myarr(j) = myarr(i)
            myarr(i) = stor
        End If
    Next j
Next i

srtAZ = myarr

End Function

Here solution is attached which i was looking for earlier.

I need to know that please how to ignore blank cell in combo box without decreasing the range.

Is there any option to ignore blank cells in Xactive Combobox.

There are 50 Cells which i have been selected and 15 of them are empty and now combobox is also showing blank cells.

How to ignore blank cells.

Thanks for reply Roy but i made it.

Dear Experts,

I am looking for that if i select 1 value from list box then it must show in Cell "D6" as well. which is highlighted and list box should be sorted as A-Z and empty cell should not visible in list box .

Please help in this regards.