Forums
New posts
Search forums
Members
Current visitors
Log in
Register
What's new
Search
Search
Search titles only
By:
New posts
Search forums
Menu
Log in
Register
Install the app
Install
Forums
Archive
Newsgroup Archive
Excel Newsgroups
Excel Programming
Need VBA solution to find 1st and 2nd occurrences of non- zero, thenreturn column header value
JavaScript is disabled. For a better experience, please enable JavaScript in your browser before proceeding.
Reply to thread
Message
[QUOTE="Don Guillett, post: 7398453"] Sub getoccur() Dim i As Long Dim j As Long Dim dc As Long For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row dc = 11 For j = 2 To Cells(i, Columns.Count).End(xlToLeft).Column If Cells(i, j) > 0 Then Cells(i, dc) = j - 1 dc = dc + 1 End If Next j Next i End Sub [/QUOTE]
Verification
Post reply
Forums
Archive
Newsgroup Archive
Excel Newsgroups
Excel Programming
Need VBA solution to find 1st and 2nd occurrences of non- zero, thenreturn column header value
Top
