Respuesta
en
VBA
y en 2 temas más
a
If, then y else en VBA problema
If Range("B4") = "Merida" Or Range("B4") = "Hermosillo" Then ActiveChart.PlotArea.Select ActiveChart.SetSourceData Source:=Range( _ "'Dashboard 2'!$B$9,'Dashboard 2'!$E$9") ElseIf Range("B4") = "Mexicali" Then ActiveChart.PlotArea.Select...
Respuesta
en
Visual Basic
y en 1 temas más
a
Problemas con MsgBox: No aparece
Existe = True If Existe = True Then DoCmd.OpenForm (todo el camino) , acEdit, acNormal DoCmd.Close acForm, "Buscar Expediente" Else x= MsgBox ("No se ha encontrado el Expediente buscado" & vbYesNo & "¿Desea incorporarlo ahora?", vbInformation, "NO...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Macro para activar label al seleccionar item en combobox
Private Sub ComboBox1_Change() Select Case ComboBox1.ListIndex Case 0 ThisWorkbook.Save Application.Quit Case 1 TextBox1 = "Regresa al archivo" Label5.Caption = "Regresa al Archivo" End Select End Sub Me comentas y valoras la respueta para finalizar...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Controlar valor repetido en un listbox que venga de otro listbox
Envíame tu archivo [email protected]
Respuesta
en
Visual Basic
y en 1 temas más
a
Como hacer que funcione este código
El vídeo esta bien explicado cual es tu dificultad. Saludos!1
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Como le agrego un validador a mi macro que me indique que los datos ya fueron grabados?
Entiendo que la validación es a partir de una Textbox de un formulario. Set b = Sheets("Hoja2").Columns("A").Find(Textbox1, lookat:=xlWhole) If Not b Is Nothing Then MsgBox "Los datos ya fueron grabados" Exit Sub End If Cuando ingresas datos al...
Respuesta
en
Microsoft Access
y en 3 temas más
a
Como hacer una base datos para consultar dni con imagen
Pon tu correo y te mando una macro de ejemplo Te explico cuando seleccionas el código del combobox automáticamente muestra la foto, que lo extrae de la carpeta FOTO1. Y las fotos deben estar guardados con el código.
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Como agregar el texto de una casilla a un texbox tempo01
Te envío el código Private Sub ComboBox1_Change() Select Case ComboBox1.ListIndex Case 0 CmdBotonpapel.Enabled = True '///////////////////////////////// TextBox3 = Sheets("CARTON").Range("C8") Case 1 CmdBotoncarton.Enabled = True...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Mensaje al introducir valor en un campo de formulario si cumple cierta condicion
Textbox2.text = 15 if Textbox1.text > Textbox2.text then Msgbox" Es mayor a 15%" exit sub End if Me comentas saludos!!
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Como agregar la información capturada a diferentes hojas de Excel con un botón personalizado para cada hoja para tempo01
Te facilito el código fuente. If TextBox1 = "" And TextBox2 = "" Then MsgBox "Ingrese los datos obligatorios", vbInformation, "Aviso" Exit Sub End If Set h1 = Sheets("CARTON") u1 = h1.Range("A" & Rows.Count).End(xlUp).Row + 1 h1.Cells(u1, "A") =...