Hola en esta ocasión les quiero compartir un ejemplo de una macro de Excel para poder ordenar datos de columnas y obtener los datos únicos de una columna. Por ejemplo yo tengo un Archivo de Excel del que quiero obtener las fechas para poder obtener los datos y los mostrare en una columna, la pantalla de ejemplo se ve así El primer caso es para obtener los fechas únicas de una columna y colocarlas en una columna 'select dates filas 'Declaramos variables Dim fin As Long, i As Long, unicos As Variant, unicos2 As Variant With Sheets("InputFile") fin = Application.CountA(.Range("A:A")) unicos = WorksheetFunction.Unique(.Range("A1:A" & fin)) 'Obtenemos los datos de la matriz y los pasamos a una columna i = 0 For i = LBound(unicos) To UBound(unicos) .Cells(i + 1, 5) = unicos(i, 1) Next i .Range("E2:E100").Select Selection.Columns.Sort key1:=Colum
En este Blog puedes encontrar Información para comenzar a programar por medio de: un poco de historia de programación, conceptos de programación, ejemplos sencillos con lenguajes de programación como : PHP,HTML, Javascript,Delphi, Visual Basic,Python, Progress 4gl,C++,SQL, entre otros. La programación es para todos, en un proyecto de desarrollo de Software se requieren equipos multidisciplinarios y es bueno que todos comprendan que implica desarrollar Software.