Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
unable to get the activate property of the range class
im trying to
================================================== === what code do i add to a commandbutton2 for the next? they enter name and lastname in the textbox. when hitting commandbutton2 i need that data from textbox1 in the next open cell sheet1 column c down. and then command button disable. refresh either userform1 or listbox1 ================================================== === i got this code and it works ================================================== === Option Explicit Private Sub CommandButton1_Click() Dim myStr As String Dim iCtr As Long Dim mySep As String mySep = ", " myStr = "" With Me.ListBox1 For iCtr = 0 To .ListCount - 1 If .Selected(iCtr) = True Then myStr = myStr & ", " & .List(iCtr) End If Next iCtr End With If myStr = "" Then 'nothing checked Else myStr = Mid(myStr, Len(mySep) + 1) End If Worksheets("inv 1st page").Range("d42").Value = myStr Unload UserForm1 Sheets("DATA SHEET").Select Range("A111").Select End Sub Private Sub UserForm_Initialize() Dim myRng As Range With Worksheets("inputpage") Set myRng = .Range("c1", .Cells(.Rows.Count, "c").End(xlUp)) End With With Me.ListBox1 .MultiSelect = fmMultiSelectMulti .ListStyle = fmListStyleOption .List = myRng.Value End With End Sub ================================================== === now i want to add this and get the message popup that say unable to get the activate property of the range class ================================================== === Private Sub CommandButton1_Click() Dim i As String Dim Lrow As Variant Lrow = Sheets("Sheet1").Range("C65536").End(xlUp).Offset( 1, 0).Activate If TextBox1.Value < "" Then ActiveCell.Value = TextBox1.Value End If CommandButton1.Enabled = False |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Unable to set NumberFormat Property of Range class | Excel Programming | |||
Unable to set NumberFormat Property of Range class | Excel Programming | |||
Unable to set FormulaArray property of the Range class | Excel Programming | |||
Unable to set the Locked property of the range class | Excel Programming | |||
Unable to set the Locked Property of the Range Class | Excel Programming |