# Search:

Type: Posts; User: mikerickson; Keyword(s):

Page 1 of 6 1

1. ## Thread: Workbook Coding Effecting other workbooks

by mikerickson
Replies
4
Views
123

### Re: Workbook Coding Effecting other workbooks

The OP code does not specify which workbook's Worksheets collection is to be used. This is called "unqualified".By default, the ActiveWorkbook is used.

PrevSheet = Worksheets(xIndex -...
2. ## Thread: Workbook Coding Effecting other workbooks

by mikerickson
Replies
4
Views
123

### Re: Workbook Coding Effecting other workbooks

My guess is that Worksheets(xIndex-1) isn't qualified.

Try

by mikerickson
Replies
1
Views
68

### Re: VBA convert Activecell to number in spreadsheet

ActiveCell.Offset(0,1).FormulaR1C1 = "=LEFT(R[1]C2, FIND("" "",R[1]C2)-1)"
4. ## Thread: Converting number to fixed length field

by mikerickson
Replies
8
Views
409

### Re: Converting number to fixed length field

How about = RIGHT("00000000000000" & SUBSTITUTE(A1,".",""), 14) which handles any location of the decimal point.
5. ## Thread: Find highest number when mixedwith text in each cell

by mikerickson
Replies
3
Views
122

### Re: Find highest number when mixedwith text in each cell

The CSE formula (entered with Ctrl-Shift-Enter) will return the highest index of CA numbers in column A. The "CA" is not part of the returned value.

=MATCH(0,...
6. ## Thread: Data validation and numbers + hyphens

by mikerickson
Replies
9
Views
166

### Re: Data validation and numbers + hyphens

How about =VALUE("1" & LEFT(A1,6) & ".0")?
7. ## Thread: Data validation and numbers + hyphens

by mikerickson
Replies
9
Views
166

### Re: Data validation and numbers + hyphens

=AND(VALUE(1&LEFT(F3,6))>=100000, MID(F3,7,1)="-", VALUE(1&RIGHT(F3,2))>=100)
8. ## Thread: Change background color of all named ranges

by mikerickson
Replies
10
Views
126

### Re: Change background color of all named ranges

Sometimes folks forget the value in being lazy.
9. ## Thread: Change background color of all named ranges

by mikerickson
Replies
10
Views
126

### Re: Change background color of all named ranges

For Each nm in ThisWorkbook.Names
On Error Resume Next
nm.RefersToRange.Interior.Color = vbYellow
On Error Goto 0
Next nm

by mikerickson
Replies
11
Views
166

### Re: Best formula to count login - logout time

Can you give us a small sample of some data, including lay-out, and the desired results?
11. ## Thread: Excel VB Textobxes Characters

by mikerickson
Replies
4
Views
80

### Re: Excel VB Textobxes Characters

What do you want to happen if the delete key is pressed (in TextBoxComments), do you want the characters to come back from TextBoxA to Comments?
12. ## Thread: Populating a TextBox with a % Value taken from worksheet cells

by mikerickson
Replies
8
Views
85

### Re: Populating a TextBox with a % Value taken from worksheet cells

What happened when you tried it?
13. ## Thread: Populating a TextBox with a % Value taken from worksheet cells

by mikerickson
Replies
8
Views
85

### Re: Populating a TextBox with a % Value taken from worksheet cells

Try

LTVTB.Value = Sheets("Form Validation").Range("D9").Text

by mikerickson
Replies
11
Views
166

### Re: Best formula to count login - logout time

Can you give us a small sample of some data, including lay-out, and the desired results?

by mikerickson
Replies
11
Views
166

### Re: Best formula to count login - logout time

How can one tell whether an entry is log in or log out? Where do you want the inverval?
Can you give us a small sample of some data, including lay-out, and the desired results?

The over midnight...

by mikerickson
Replies
11
Views
166

### Re: Best formula to count login - logout time

Could you give us a small sample of your data, with the desired results. I would expect that you had 3 columns Name, TimeIn and TimeOut.

17. ## Thread: Place sub category's letters in all items

by mikerickson
Replies
17
Views
309

### Re: Place sub category's letters in all items

change this line

prefix = UCase(Left(.Offset(-1, 1).Value, 4))

(and also change the .Cell(j,3) 's to .Cells(j,2). But it sounds like you've done that already.)
18. ## Thread: VBA to find next empty row in worksheet isn't working!!!

by mikerickson
Replies
2
Views
52

### Re: VBA to find next empty row in worksheet isn't working!!!

erow is derived from Sheet1, copyrange is on Sheets("MONTHLY REPORT")
Are they the same sheet?
19. ## Thread: Place sub category's letters in all items

by mikerickson
Replies
17
Views
309

### Re: Place sub category's letters in all items

I think this VBA will do what you want.

Sub test()
Dim StartLine As Long, EndLIne As Long
Dim i As Long, j As Long, prefix As String
StartLine = 1
With Range("F:F")
...
20. ## Thread: Worksheet that Mirrors a Table

by mikerickson
Replies
4
Views
116

### Re: Worksheet that Mirrors a Table

I'm at my dayjob and can't work on this, but the Add employee sounds doable (blank lines for their pre-employment months).
How familiar are you with VBA. This sounds like a decent sized project. Are...
21. ## Thread: Worksheet that Mirrors a Table

by mikerickson
Replies
4
Views
116

### Re: Worksheet that Mirrors a Table

You'll need to provide more detail about how these sheets are layed out.

I'm also wondering what you want when adding or deleting employees.

If you have a different sheet for Jan, Feb, Mar, ......
22. ## Thread: Build formula based off value in another Cell

by mikerickson
Replies
4
Views
106

### Re: Build formula based off value in another Cell

You could use =INDIRECT(E1&"2")-INDIRECT("F1"&2)

Which is volatile, or you could use
=INDEX(\$A2:\$D2,1, Match(E1,{"A","B","C","D"},0)) - INDEX(\$A\$2:\$D2, 1, FIND(F1,"ABCD"))
which is non...
23. ## Thread: how to get combobox multiselect results to specific worksheets

by mikerickson
Replies
4
Views
164

### Re: how to get combobox multiselect results to specific worksheets

I think that this will return the worksheet when given the Trip Name.

Function SheetFromTripName(aTripName As String) As Worksheet
Dim Prefix As String, Suffix As String
Dim oneSheet...
24. ## Thread: Reverse Hex Byte Pairs

by mikerickson
Replies
29
Views
495

### Re: Reverse Hex Byte Pairs

Once I corrected the misspelling, it worked fine for me.
25. ## Thread: Reverse Hex Byte Pairs

by mikerickson
Replies
29
Views
495

### Re: Reverse Hex Byte Pairs

Then

Function myOtherFunction(aNumber as Long) as String
Dim hexString as String

HexString = Application.Dec2Hex(aNumber)
MyOtherFunction = Hex_Pairs_Reverse(HexString)

End...
Results 1 to 25 of 150
Page 1 of 6 1