2016년 9월 23일 금요일

create a single column of unique values from multiple columns

create a single column of unique values from multiple columns

I have 2 columns of numeric values in columns I and J with headers, LINER "X" AND LINER "Y", respectfully.
I would like to create a list of unique values in Column L which has an existing Header.
It would be nice to do it with VBA as I would be using it
on multiple files with varying rows.

Keys to the Problem create a single column of unique values from multiple columns

Download Error Fixer (Free)

Hi,
Try this one which is OK in E2003

Sub Unique_Values()
Dim L1 As Long, L2 As Long, Lastrow As Long
Dim x As Long
L1 = Cells(Rows.Count, "I").End(xlUp).Row
L2 = Cells(Rows.Count, "J").End(xlUp).Row
Lastrow = WorksheetFunction.Max(L1, L2)
Dim d As Object, c As Range, k, tmp As String
Set d = CreateObject("scripting.dictionary")
    For Each c In Range("I2:J" & Lastrow)
        tmp = Trim(c.Value)
        If Len(tmp) > 0 Then d(tmp) = d(tmp) + 1
    Next c
    x = 2
For Each k In d.keys
Cells(x, "L") = k
x = x + 1
Next k
End Sub

To check for Windows updates

  1. Open Windows Update by clicking the Start button Picture of the Start button, clicking All Programs, and then clicking Windows Update.
  2. In the left pane, click Check for updates, and then wait while Windows looks for the latest updates for your computer.
  3. 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.

Another Safe way to Repair the Problem: create a single column of unique values from multiple columns:

How to Fix create a single column of unique values from multiple columns with SmartPCFixer?

1. You can Download SmartPCFixer here. Install it on your system. When you open SmartPCFixer, it will perform a scan.

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

3. When the Fixing part is done, your computer has been speeded up and the errors have been removed


Related: How Can You Update & Download NVidia 6100, 6800 GS/XT Display Driver v.260.89 WHQL,Where to Download NVidia GeForce 8800 GT WHQL-certified driver v.196.21,How to Update & Download NVidia GeForce Go 7400 Display Driver v.260.19.12,[Solved] Download NVidia GeForce GTX 460M Driver v.331.82,Download NVidia Quadro Plex Model IV VGA Driver v.304.43 Certified,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: control calendar 11.0 [Solved],[Solution] consantly getting message "not responding" how can I correct this? My computer freezes.,Troubleshooting:convert mail merge documents to individual pdf docs Error,Tech Support: Cumulative Security Update for Internet Explorer 10 for Windows 7 Service Pack 1 for x64-based Systems (KB2879017) error code 8007000D,Creating System Image on external hard drive error 0x80780119 not enough disc space [Anwsered],Closing Internet Explorer causes error,Compare 2 Tables and Calculate the PROFIT Faster,Computer goes to Windows Boot Manager after Start,Connect to one of my network computer remotely when don't allow exception box Marked,computer locking up randomly

댓글 없음:

댓글 쓰기