JanOwe Waldner

Desconozco cómo las tienes planteadas, prueba así: Private Sub CommandButton1_Click() Macro1 Macro2 End Sub Sub Macro1() MsgBox "Corriendo la 1" End Sub Sub Macro2() MsgBox "Corriendo la 2" End Sub

Entiendo que deseas seleccionar todo el texto contenido en un TextBox cuando este reciba el foco, es decir, cuando sea el control 'activo'. Prueba con lo siguiente: Private Sub TextBox1_Enter() TextBox1.SelStart = 0 TextBox1.SelLength =...

Desconozco cómo tienes organizadas las columnas y los controles de tu formulario pero, básicamente, podría ser algo así: Private Sub CommandButton1_Click() Dim Fila As Integer For Fila = 1 To Range("A" & Rows.Count).End(xlUp).Row If Cells(Fila, 1) =...

Prueba con lo siguiente y lo adaptas según tu necesidad. -------------------- Private Sub Worksheet_Change(ByVal Target As Range) Dim Fila As Integer, Columna As Integer, UltimaFila As Integer Dim Permiso As String, Constancia As String, Cuando As...

A ver si te sirve esto: ------------------------ Private Sub Worksheet_Change(ByVal Target As Range) Dim Fila As Integer If Target.Column = 6 Then Fila = Target.Row If Cells(Fila, 6) > Cells(Fila, 2) Then Cells(Fila, 2) = "" Cells(Fila, 3) = "" End...

¿Has revisado el nivel de seguridad? Tal vez puedan estar deshabilitadas.

Supongo que te refieres a algo así: txtCorte.Text = Left(txtUPC.Text, 7) txtBulto.Text = Mid(txtUPC.Text, 8, 3) txtPieza.Text = Right(txtUPC.Text, 3)

Si por matriz te refieres a un rango de celdas... =PROMEDIO(A1:F10) y lo adaptas a tu necesidad.

Drupal, Joomla o WordPress, CMS muy potentes y relativamente sencillos de usar. Infinidad de temas (plantillas) tanto libres como de pago.

Los SMS únicamente funcionan con texto, para imágenes tendrías que enviar MMS. Otra posibilidad es pasarla por Bluetooth. ¿Admiten ambos teléfonos estas tecnologías?