san lo

san lo

veni, vidi, vicci
 1.475 puntos  España @juanfranciscosantoslopez desde - visto

Respuestas en Microsoft Excel

Respuesta en y en 2 temas más a

Seleccionar Datos de una Tabla de Excel en función de los datos de dos o más columnas

puedes usar querys en la propia Excel ejemplo select nombre,ciudad,cp,.. from [nombrehoja] y la cláusula WHERE para crear filtros. Previo deberás crear una conexión al libro es fácil y hay mucha info en internet
Respuesta en y en 3 temas más a

Copiar filas que no estén duplicado

Dante Cómo puedo implementarlo en último código.
Respuesta en y en 3 temas más a

Ordenar Hojas con Macro Excel

Sub OrdenarHojas() For i = 1 To Application.Sheets.Count For j = 1 To Application.Sheets.Count - 1 If UCase$(Application.Sheets(j).Name) > UCase$(Application.Sheets(j + 1).Name) Then Sheets(j).Move after:=Sheets(j + 1) End If Next Next End Sub
Respuesta en y en 2 temas más a

Pasar datos multiseleccionados de un listbox a una hoja Excel

Te paso un enlace: Pasar elementos de un listbox a otro, aunque si prefieres mejor espera la respuesta de Dante seguro es más completa y te ayudara mejor.
Respuesta en y en 2 temas más a

Agregar 2 instrucciones a macro actual de registro

Prueba así: mensaje = MsgBox("Ud desea realizar un nuevo registro con los mismo datos actuales?", vbYesNo + vbExclamation, strTitulo) If mensaje = vbNo Then Exit Sub else h1.Unprotect Password:="0976342842" H1. Range("F5:F7"). ClearContents H1....
Respuesta en y en 2 temas más a

Macro que al hacer doble click me lleve a la hoja que contenga dato

Y me sitúe en esa hoja encontrada
Respuesta en y en 2 temas más a

Macro que me agregue los registros a un combobox

Googleando he encontrado esta función, pero no me funciona: Function AgregarItems(Cmb As ComboBox, Hoja As String, Cond As String, ColCond As Integer, ColDato As Integer) Dim collec As New Collection Sheets(Hoja).Activate Range("A2").Activate On...
Respuesta en y en 1 temas más a

¿Cómo usar una macros en un solo worksheets más de una vez en diferentes Columnas o celdas?

If Target.Column = 6 Then elseif target.column =x then end if
Respuesta en y en 3 temas más a

Básicamente quiero que su un clic cada uno del valor de texto en el rango de C11 a C16 actualizar el gráfico a continuación

Sub resumido() Range("BT11").Select Range(Selection, Selection.End(xlToRight)).Select Range(Selection, Selection.End(xlDown)).Select Selection.copy Range("c1").Select Selection.EntireColumn.Select Selection.Find(What:="Sell out", After:=ActiveCell,...
Respuesta en y en 4 temas más a

Al cambiar una celda, me limpie dos rangos de cada hoja

Dos rangos: Range("G81:U111"). ClearContents . Range("Z81:AK111"). ClearContents