MTS to MP4 Conversion : How Can I Fix - Creating an input sheet that works??

Friday, September 23, 2016

How Can I Fix - Creating an input sheet that works??

Creating an input sheet that works?

I am trying to create an input sheet so i can track some information.
I want the proper formula if there is one, to send all the information I enter on the first worksheet to one of 5 other worksheets in the same workbook. I need b1,b2,b3,b5,b6,b7,b8,b9
to look at b4 (which is a drop down box with the titles of the other worksheets) and send them to a1,b1,c1,d1,e1,f1,g1,h1,i1 in the work sheet specified in b4. Here is the part i dont know is possibe.
Can excel see that those cells have names, dates, ect...
in them and just move them down so i dont overwrite the information added previously.
For example if I enter "John Smith" on the input page and select "worksheet 2" from the drop down in b4, can i save that once it is done come back later or even in the same
setting and input "Mark Smith" selecting the same worksheet 2 and retain all the information from the first person. This way i can not only stream line this process but keep a running record of all this information. I have basic knowledge of the formulas
and how to use them, but this is outta my leauge.

Keys to the Problem Creating an input sheet that works?

Download Error Fixer for Free Now

Copy the code below, right-click the sheet tab, select "View Code" and paste the code into the window that appears.
When you select a value in cell B4, the cells of interest will be copied to the bottom of the list on the chosen sheet.
If you edit the
data, you must re-select B4 and select the sheet name from the drop down even if it is the same sheet as before - the selecting of the sheet name in B4 is what makes the code run.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim lngR As Long
Dim shtD As Worksheet
If Target.Address <> "$B$4" Then Exit Sub
Application.EnableEvents = False
Set shtD = Worksheets(Target.Value)
With shtD
lngR = .Cells(.Rows.Count, 1).End(xlUp).Row + 1
.Cells(lngR, 1).Value = Range("b1").Value
.Cells(lngR, 2).Value = Range("b2").Value
.Cells(lngR, 3).Value = Range("b3").Value
.Cells(lngR, 4).Value = Range("b5").Value
.Cells(lngR, 5).Value = Range("b6").Value
.Cells(lngR, 6).Value = Range("b7").Value
.Cells(lngR, 7).Value = Range("b8").Value
.Cells(lngR, 8).Value = Range("b9").Value
End With
Application.EnableEvents = True
End Sub

To check for Windows updates

Open Windows Update by clicking the Start button Picture of the Start button, clicking All Programs, and then clicking Windows Update.
In the left pane, click Check for updates, and then wait while Windows looks for the latest updates for your computer.
If any updates are found, click Install updates. Administrator permission required If you are prompted for an administrator password or confirmation, type the password or provide confirmation.

Recommended Method to Fix the Problem: Creating an input sheet that works?:

How to Fix Creating an input sheet that works? with SmartPCFixer?

1. Click the button to download SmartPCFixer . Install it on your computer. Open it, and it will perform a scan for your system. The junk files will be shown in the scan result.

2. After the scan is finished, you can see the errors and problems need to be repaired. Click Fix All.

3. The Repair part is done, the speed of your computer will be much higher than before and the errors have been fixed. You can also use other functions in SmartPCFixer. Like dll downloading, windows updating and print spooler error repair.