Re: Is this possible?

Newmind....I see my mistake! You did it! Thank you so much, it works
perfectly now. I really appreciate you taking the time to help me.

Chris

Chris Cred wrote:
>OOPS.CODE:
>
>Private Sub cmdAdd_Click()
> rowno = Columns(1).Find(Trim(ComboBox1.Value)).Row
> Range("C" & rowno).End(xlToLeft).Offset(0, 1) = ComboBox2.Value
> Range("D" & rowno).End(xlToLeft).Offset(0, 1) = ComboBox3.Value
>
>'check for a part number
>If Trim(Me.ComboBox1.Value) = "" Then
> Me.ComboBox1.SetFocus
> MsgBox "Please select the course number."
> Exit Sub
>End If
>
>'clear the data
> Me.ComboBox1.Value = ""
> Me.ComboBox2.Value = ""
> Me.ComboBox4.Value = ""
> Me.ComboBox1.SetFocus
>
>End Sub
>
>>Hi,
>>
>[quoted text clipped - 7 lines]
>>>> >>> >Cells(rowno, colno + 1).Value = TextBox1.Value
>>>> >>> >End Sub

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.aspx/excel-programming/200601/1
.

Relevant Pages

  • Code runs in 2002 but not in 97!?
    ... Sub send_mail_Click ... If you don't know it please contact Big Chris", ... If mynum = "" Then ... vbInformation, "Validation Code Entry Error!" ...
    (microsoft.public.excel.programming)
  • Re: Problem deleting rows by index
    ... Hi Chris, sorry I realized that you were testing different approaches after I ... Sub mainSub() ... FindAndHighlight "hotmail", 6 ... Loop While c.Address firstAddress ...
    (microsoft.public.excel.programming)
  • Re: Hide Columns based on network username
    ... "Chris" wrote: ... 'worksheet2' or if I can somehow add it to the below code somwhere. ... Private Sub Workbook_Open ... Sub FrontpageFirst() ...
    (microsoft.public.excel.programming)
  • Re: Hide Columns based on network username
    ... Since there is no reference this line just works on the active sheet ... "Chris" wrote: ... 'worksheet2' or if I can somehow add it to the below code somwhere. ... Private Sub Workbook_Open ...
    (microsoft.public.excel.programming)
  • Re: "cannot quit Visio" Message
    ... Thanks Chris. ... > Are you setting your VB6 visDoc objects to nothing before they close? ... > Sub OpenADoc ... > can release your VB6 Visio application object. ...
    (microsoft.public.visio.developer)