Select from freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely and get projects done right.
Private Sub cmdProcess_Click() Dim wkb As String, i As Integer, response As Integer, msg As String, title As String, style As String, _ intcounter As Integer, oCtrl As Control, k As String 'check for list box selection If Me.lstTrans = vbNullString Then 'if nothing was selected, tell user and let them try again ->> Exit Sub Else 'only controls For Each oCtrl In frm_ledger_coding.fra1.Controls 'only option buttons If TypeName(oCtrl) = "OptionButton" Then 'which one is checked? If oCtrl.Value = True Then 'what's the tag? k = oCtrl.Tag Exit For End If End If Next 'specifying cunter to start from row 2 intcounter = 2 If k = "" Then Exit Sub Else 'specifying list selection counts For i = 0 To lstTrans.ListCount - 1 If lstTrans.Selected(i) Then With ActiveWorkbook.Worksheets("Import") 'Range H being the amount which always have a value While .Range("H" & intcounter).Value <> "" 'compare the key in column c with the list value in column 0 (bound column) If .Range("C" & intcounter).Value = lstTrans.List(i) Then Range("I" & intcounter).Value = k End If intcounter = intcounter + 1 Wend End With End If Next i End If End Sub
|Function for selecting rows from data set and combining certain rows based on criteria||16||29|
|MS Excel Vllokup or formula to see if a record exists...||1||22|
|VBA Works in Excel 2010 Not 2016 Help!||5||18|
|Excel 2016 vba task to have certain column appear in certain rows||20||23|