Tech Support: Can you have an IF Then Copy to cell after last cell with value Function without a macro

Can you have an IF Then Copy to cell after last cell with value Function without a macro

I have the following,
Cell A1 could equal 1, 2 or 3
Cell B1 will equal a numerical value

Is there a non-macro function that can perform the following,
If cell A1 = 1, copy B1, paste B1 in the empty cell directly below that last cell with a value in column D
if cell A1 = 2, copy B1, paste B1 in the empty cell directly below that last cell with a value in column E

if cell A1 = 3, copy B1, paste B1 in the empty cell directly below that last cell with a value in column F

Thanks

Pat

Solutions to the Problem Can you have an IF Then Copy to cell after last cell with value Function without a macro

Download SmartPCFixer to Fix It (Free)

Try this macro:
 
Sub CopyValues()
    Dim wshS As Worksheet
    Dim wshT As Worksheet
    Dim r As Long
    Dim m As Long
    Dim c As Long
    Set wshS = Worksheets("Inverter Design")
    Set wshT = Worksheets("AC Combiner")
    m = wshS.Cells(wshS.Rows.Count, 1).End(xlUp).Row
    For r = 6 To m
        c = wshS.Cells(r, 1)
        wshT.Cells(wshT.Rows.Count, c).End(xlUp).Offset(1, 0).Value = _
            wshS.Cells(r, 2).Value
    Next r
End Sub

Open Action Center by clicking the Start button Picture of the Start button, clicking Control Panel, and then, under System and Security, clicking Review your computer's status.

Update and run your antivirus software. Windows doesn't come with antivirus software, but Action Center can often monitor the antivirus software that you or your computer manufacturer have installed.

Another Safe way to Repair the Problem: Can you have an IF Then Copy to cell after last cell with value Function without a macro:

How to Fix Can you have an IF Then Copy to cell after last cell with value Function without a macro with SmartPCFixer?

1. Click the button to download Error Fixer . Install it on your computer.  Open it, and it will scan your computer. The junk files will be shown in the scan result.

2. After the scan is done, you can see the errors and problems which need to be repaired.

3. The Fixing part is done, the speed of your computer will be much higher than before and the errors have been fixed.

Related: How to Download Toshiba Satellite A205-S5833 Supervisor Password Utility v.1.48.0.8C r2 driver,How to Download Toshiba Satellite C675-S7104 Laptop Checkup v.2.0.13.11 driver,How Can I Update & Download Toshiba Satellite L655-S5117 Face Recognition v.3.1.3 driver,Method to Update & Download Toshiba Satellite L845D-SP4328KL Atheros LAN Driver v.2.1.0.5,How to Update & Download Toshiba Satellite R930 Network Device ID Registry Setting Tool v.3.0.32.4 driver,Best Way to Download NVidia GeForce 6100 VGA Driver v.304.51 Certified,How Can You Update & Download NVidia GeForce 9300/nForce 730i VGA Driver v.310.19 Certified,Method to Download NVidia GeForce GT 330M Driver v.340.65,How Can I Update & Download NVidia GeForce GTX 590 Driver v.280.26 WHQL,Method to Download NVidia Tesla C2050 Driver v.319.17,Way to Download RealTek RTL8100C(L) Driver v.5.01,Way to Download RealTek RTL8100E Drivers v.694,Way to Update & Download RealTek RTL8101L Auto Installation Program v.6.110 driver,Method to Update & Download RealTek RTL8111G PXE and RPL ROM code v.2.58 driver,How to Update & Download RealTek RTL8411B(N) Driver v.10.003,Best Way to Update & Download ASUS A53SV nVidia Graphics Driver v.8.17.12.6686,Method to Herunterladen ASUS K75VJ Intel Rapid Storage Technology Treiber v.11.6.0.1030,How Can You Update & Download ASUS CG8580 Intel Chipset Driver v.9.3.0.1019,Method to Update & Download ASUS K41VD Intel INF Update Driver v.9.1.1.1015,Way to Update & Download ASUS Pro70T NB Probe v.3.0.0026 driver
Read More: How to Fix Error - Can I run W7 backup without restart?,Troubleshoot:Can I set up a Homegroup with two computers using Windows7 Home Premium 32 bit and one computer using Windows7 Home Premium 64 Bit? Error,Troubleshoot:Can Windows XP and Windows 7 share a printer easily? Error,Can Quickbooks 2009 Pro be run in Windows 7 using the XP mode? [Solved],How to Fix Problem - Can system reserve be defragmented??,Can I safely remove earlier versions on my pc,Can I rotate a graph so it shows on my page sideways?,Can I safely ignore Office file validation alert message?,Can I send a JPEG file in a PDF form ?,can I review when my computer has been accessed from outside my home?