Abraham Valencia

No te termine de entender, pero, por ejemplo para enviar los datos seleccionados de un "ListBox" a una sola celda, podrías usar algo así: Private Sub CommandButton1_Click() Dim x As Long With ListBox1 For x = 0 To .ListCount - 1 If .Selected(x) =...

Mi primer consejo sería que tengas un "TextBox" para el nombre, un "ComboBox" para el "Nivel" y uno para el "Lado" (esos dos últimos cada uno con todas las opciones) y un "TextBox" para la fecha. Todos los datos irían a una sola hoja. ¿Qué opinas? If...

Te servirá algo en que los valores que mencionas están en celdas y que, además, permita que el usuario elija el archivo. Sub EjemploCorreo() Dim Archivo As String Dim Outlookapp As New Outlook.Application Dim MItem As MailItem With...

Es la segunda vez que veo esta misma intervención (aunque la anterior fue con otro usuario) y si bien me parece bueno que quieras ayudar a tu novia, aunque suene un poco duro la verdad no estás pidiendo poco y quizá por eso nadie se animó a responder...

¿Tienes hojas "ocultas" en tu archivo? No olvides que el nombre de la hoja, por más que sea con número, no es lo mismo que el índice. Quizá la hoja de índice 4 está oculta. Abraham Valencia

La grabadora de macros es muy buena para ir comenzando con el VBA y lo mejor es eso de ir probando/ensayando, es la mejor manera de aprender. Un ejemplo simple como para que vayas analizándolo: Sub Combinando() Dim FilaFinal As Long, x As Long Let...

Asumo que te refieres a SQL Server pero no mencionas que versión usas. Hay que hacerlo todo con VBA, ADO (es lo que yo recomiendo siempre) y usando sentencias SQL pero para no seguir bajo supuestos, quizá algunos detalles ayuden a ayudarte. Abraham...

No colocas el error exacto que te da, peor por lo que mencionas solo puede haber, aparentemente, tres motivos: - En la carpeta en donde está el archivo en donde tienes ese código, NO existe una carpeta "photos" - En el "TextBox1" estás introduciendo...

Hazlo así: 'Desproteges al inicio Sheets("Hoja1").Unprotect "tu_clave" 'Proteges al final Sheets("Hoja1").Protect "tu_clave" Obvio reemplaza por el nombre de tu hoja y por tu clave. Comentas Abraham Valencia

Dos opciones rápidas, son: 1- Si tus hojas no cambiarán de posición, usar el indice y no el nombre, recordando que la número 1 es la que está más a la izquierda: Sheets(1).Select 2. Usa el nombre del módulo de la hoja. De forma predeterminada dicho...