Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default Userform Help


I have tried to create a userform that would allow users to type in the
information in (8) textboxes and when the hit ok it would fill in the
cells on the sheet. this page has 200 rows and 8 cells per row will
contain Data.

If anyone could give details and instructions to help that would be
great.

the sheet name is: Lab Input

a- employee name
b- title
c- rate
d- date
e- hours
f- vehicle info
g- mileage
h- vac allowance

thank you
this is my first post!!:)


--
GDillon
------------------------------------------------------------------------
GDillon's Profile: http://www.excelforum.com/member.php...o&userid=31438
View this thread: http://www.excelforum.com/showthread...hreadid=511290

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 2,494
Default Userform Help

create your userform. add a button. double click the button. i use something
like this. my userform contains textboxes and comboboxes, so they start with
"CB" and "TB". just use your own names and change he ranges to wherever you want
your data to go when the button is clicked.




Private Sub CommandButton1_Click()
Dim lastrow As Long

Application.ScreenUpdating = False

Worksheets(1).Unprotect
lastrow = Worksheets(1).Cells(Rows.Count, "A").End(xlUp).Row

Range("A" & lastrow + 1) = Me.CBtype.Value
Range("B" & lastrow + 1) = Me.CBcode.Value
Range("C" & lastrow + 1) = Me.TBweight.Value
Range("D" & lastrow + 1) = Me.TBdv.Value
Range("E" & lastrow + 1) = Me.TBFrchg.Value
Range("F" & lastrow + 1) = Me.TBFrtBil.Value
Range("J" & lastrow + 1) = Me.TBzip.Value
Range("K" & lastrow + 1) = Application.Proper(Me.TBcomment.Value)
Range("A" & lastrow + 1 & ":F" & lastrow + 1).Locked = False
Range("J" & lastrow + 1 & ":K" & lastrow + 1).Locked = False

Worksheets(1).Protect

Application.ScreenUpdating =True

End sub
--


Gary


"GDillon" wrote in
message ...

I have tried to create a userform that would allow users to type in the
information in (8) textboxes and when the hit ok it would fill in the
cells on the sheet. this page has 200 rows and 8 cells per row will
contain Data.

If anyone could give details and instructions to help that would be
great.

the sheet name is: Lab Input

a- employee name
b- title
c- rate
d- date
e- hours
f- vehicle info
g- mileage
h- vac allowance

thank you
this is my first post!!:)


--
GDillon
------------------------------------------------------------------------
GDillon's Profile:
http://www.excelforum.com/member.php...o&userid=31438
View this thread: http://www.excelforum.com/showthread...hreadid=511290



Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Userform to enter values and shown in same userform in list helmekki[_104_] Excel Programming 0 November 19th 05 03:23 PM
Looping procedure calls userform; how to exit loop (via userform button)? KR Excel Programming 6 July 27th 05 12:57 PM
Activating userform and filling it with data form row where userform is activate Marthijn Beusekom via OfficeKB.com[_2_] Excel Programming 3 May 6th 05 05:44 PM
Access from add_in userform to main template userform.... Ajit Excel Programming 1 November 18th 04 05:15 PM
Linking userform to userform in Excel 2003 missmelis01 Excel Programming 2 August 27th 04 08:07 PM


All times are GMT +1. The time now is 01:47 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"