Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

Adding subtask that shows in userform and then creates in new row

Posted on 2016-08-29
7
Medium Priority
?
82 Views
Last Modified: 2016-08-29
Hello guys, i have created this userform and got it to work up to the point of the information text in the textbox send to a new row.

What i want in addition is that when i click on a row and then click on the button called add_subtask
***Have that row of column (D and E) shown on the userform.
***When clicked on the userform option button (ADD SUBTASK) have all the information on the userform sent to a new row. Demonstration is on attachment and code is underneath this line, i would appreciate it a mil Experts Exchange users and thanks for your time.

Demonstration 1Demonstration 2Demonstration 3
Private Sub CommandButton1_Click()
Dim iRow As Long
Dim ws As Worksheet
Set ws = Worksheets("GENERAL")

'find first empty row in database
iRow = ws.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row

'check for a Name number
If Trim(Me.textbox_name.Value) = "" Then
Me.textbox_name.SetFocus
MsgBox "Please complete the form"
Exit Sub
End If

'copy the data to the database
ws.Cells(iRow, 3).Value = Me.textbox_name.Value


MsgBox "Data added", vbOKOnly + vbInformation, "Data Added"
'clear the data
Me.textbox_name.Value = ""
Me.textbox_name.SetFocus
End Sub

Private Sub CommandButton2_Click()
Unload Me
End Sub

Open in new window

0
Comment
Question by:Omar Hernandez
  • 4
  • 3
7 Comments
 
LVL 43

Expert Comment

by:Saqib Husain, Syed
ID: 41775141
How about uploading an excel file?
0
 

Author Comment

by:Omar Hernandez
ID: 41775392
please see attachment underneath this comment
0
 

Author Comment

by:Omar Hernandez
ID: 41775393
Thanks for your fast response, please see attachment underneath this comment
TO-DO-8-29.xlsm
0
Concerto's Cloud Advisory Services

Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.

 
LVL 43

Expert Comment

by:Saqib Husain, Syed
ID: 41775774
Add this sub to the userform module below the CommandButton1_Click() sub

Private Sub UserForm_Activate()
    If ActiveCell.EntireRow.Cells(1, 4) <> "" Then Label3.Caption = ActiveCell.EntireRow.Cells(1, 4)
    If ActiveCell.EntireRow.Cells(1, 5) <> "" Then Label4.Caption = ActiveCell.EntireRow.Cells(1, 5)
End Sub

Open in new window


and in the CommandButton1_Click() sub below the line
ws.Cells(iRow, 3).Value = Me.textbox_name.Value

Open in new window

add
ws.Cells(iRow, 4).Value = Me.Label4.Caption
ws.Cells(iRow, 5).Value = Me.Label3.Caption

Open in new window

0
 

Author Comment

by:Omar Hernandez
ID: 41775781
thanks saqib It works any chance it can display the information retrieved from column d and e, when pressed on the (add subtask) button before hitting enter.
0
 
LVL 43

Accepted Solution

by:
Saqib Husain, Syed earned 2000 total points
ID: 41775800
It should display as soon as the userform is activated.
0
 

Author Closing Comment

by:Omar Hernandez
ID: 41775803
Thanks a mil Saqib Husain for your help
0

Featured Post

Concerto Cloud for Software Providers & ISVs

Can Concerto Cloud Services help you focus on evolving your application offerings, while delivering the best cloud experience to your customers? From DevOps to revenue models and customer support, the answer is yes!

Learn how Concerto can help you.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This code takes an Excel list of URL’s and adds a header titled “URL List”. It then searches through all URL’s in column “A”, looking for duplicates. When a duplicate is found, it is moved to the top of the list. The duplicate URL’s are then highlig…
This article describes how to use a set of graphical playing cards to create a Draw Poker game in Excel or VB6.
The viewer will learn how to use the =DISCRINV command to create a discrete random variable, use this command to model a set of probabilities and outcomes in a Monte Carlo simulation, and learn how to find the standard deviation of a set of probabil…
This Micro Tutorial demonstrates in Microsoft Excel how to consolidate your marketing data by creating an interactive charts using form controls. This creates cool drop-downs for viewers of your chart to choose from.

926 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question