Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
How about getting a list
from a spread to a combo box or a website/another sheet when a button is pressed. getting the entries in cells to appear in a combobox on a worksheet or on a userform can be done just by setting the listfillrange or rowsource property. getting cells to a website means what? This is a totally different question/concept. -- Regards, Tom Ogilvy "jungleman" wrote in message ... You might be getting frustrated at this, but I did everything you told me to. 1. Pasted everything needed 2. followed directions 3. don't really know what I was supposed to do with the text box. ............. How about somthing simple Using the same format of dragging and simple codes. How about getting a list from a spread to a combo box or a website/another sheet when a button is pressed. I'm pretty literate to this sort of thing and learn quick. Love excel, just want to bump it up a notch, and appreaciate your help. "Rowan" wrote: In the IDE add a module. Insert Module. Paste the following into the module: Sub Start() frmDemo.Show End Sub Return to spreadsheet, type something in A1, then Tools Macro Macros, select "Start" and click Run. Regards Rowan "jungleman" wrote: Funky question? Did all you told me to, then got to #10 on your list. How do I run, and edit. I tried right clicking to look for the editing area as in the other way I was doing it. ;-0 "Patrick Molloy" wrote: 1) open the IDE (Alt+F11) 2) add a form - Insert, Userform. change name to frmDemo 3) show the toolbox 4) add controls as required....for now drag an edit box onto the form, and change its name to txtDemo 5) add a button to the form, name it btnSave, set the caption to Save 6) add a button to the form, named btnClose, set the caption to Close 7) add a button to the form, named btnRead, set the caption to Read 8) add this code to the form: Option Explicit Private Sub btnRead_Click() LoadData End Sub Private Sub btnSave_Click() SaveData End Sub Private Sub btnClose_Click() Unload Me End Sub Private Sub LoadData() txtDemo.Text = Range("A65000").End(xlUp).Value End Sub Private Sub SaveData() Range("A65000").End(xlUp).Offset(1, 0).Value = txtDemo.Text txtDemo = "" End Sub 9) return to the spreadsheet and type something into cell A1 10) run the form The Read button reads the last item from column A and displays the value in the text box. Edit the textbox. the save button appends the value from the text box to the list. This is a very simple demo. hope it helps though run the form. Its really simple "jungleman" wrote: Office 2003 - Now.....with out going through a lot of the VB coding stuff. I would like to make a form, add page tabs, combo boxes, buttons, etc. but for some reason, I'm having a hell of a time trying to place it together. I can add a button or a CB to a cell that functions, but cannot to the form process. I'd like to make a data entry functionality form, w/all the fixins. Let's start from scratch one. 1. Placed form background down. 2. Have list of about six cells with the info needed for the CB 3. Placed CB on top of form. 4. stuck!!!!!!!! When I save the form, and try to click on the/a button or CB, the whole form borders up as in edit mode. Thanks, Eric |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|