san lo

san lo

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

Respuestas en Visual Basic

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 2 temas más a

Como puedo programar turnos msflexgrid

Private Sub Text1_LostFocus(Index As Integer) Select Case Index Case 1 'Set RS = New Recordset ArrayFestivos "ORG_FESTIVOS", Text1(0), " WHERE TRANSFERIBLE=-1" Grid.Clear fechainicial = "01/" & Text1(1) & "/" & Text1(0) numdias =...
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 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 2 temas más a

Cambiar valor cuadro de texto dependiendo de registros de subformulario access

Debes vincular la propiedad listindex del combo del subformulario con el combo del formulario en el evento combo change
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