We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
Dim Str As String Dim MyString As Variant L = Len(Cell.Value) c = Cell.Value For P = 1 To L Sep = "," If P = L Then Sep = "" NextVal = Asc(Mid(c, P, 1)) & Sep Str = Str & NextVal Next P
MyString = Array(Str) Ch = MyString(1)
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Open Dialog box to specific folder||2||14|
|Slicers by Groups in Excel||7||22|
|Open folder via explorer, but stop user from changing folder||6||21|
|MS Access Recordset Need Help Setting All Record Values In A Query To False (No)||6||17|