Marcial C. C.

Y si utilizas una fórmula, ¿no te valdría?. Pon en A1 el nombre del Proveedor ( o en una celda que no utilices) y en A2 (o en una celda que no utilices), esta fórmula) =SUMAR.SI($B$7:$B$50;B7;$J$7:$C$50) Con lo cual tienes un buscador en dos celdas....

Me imagino que cuando dices que se ha introducido en formato mm/dd/yyyy, es cuando grabas lo que hay en el textbox en una celda. El problema está en que en el textbox, lo que tienes es un texto y lo hay que convertir a fecha, haz lo siguiente:...

Realmente es igual que utilices la versión de 32 o la de 64 bits, depende de tú máquina, las características de ambas versiones son las mismas. Con respecto a lo nuevo de 2013, aquí tienes un resumen:...

Ten en cuenta que si el usuario pulsa el botón Cerrar o el botón Cancelar del inputbox, la variable donde guardas la reSpuesta del inputbox estará vacía. Sabiendo esto es fácil conseguir lo que quieres, compara esa variable y si está vacía es que ha...

Prueba con esto, para un libro con macros: Sub GuardarConMacros() nombreCopia = "El nombre con el que quieras guardar la copia del libro" ActiveWorkbook.SaveAs nombreCopia, xlOpenXMLWorkbookMacroEnabled End Sub Y esto para un libro sin macros Sub...

Es más fácil así: Private Sub Worksheet_Change(ByVal Target As Range) 'Solo se ejecuta si se ha cambiado la celda B2' If Not Intersect(Target, Range("B2")) Is Nothing Then 'Mediante un Select Case controlamos el valor de B2 Select Case...

Aquí te dejo el código Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As Integer Private Const VK_CAPITAL = &H14 Sub Nueva_Antigua() Dim tipo As Variant If GetKeyState(VK_CAPITAL) = 1 Then resp = MsgBox("¡Las mayúsculas...

Prueba con esto: Sub AbrirPrograma() ejecuta = Shell("C:\Facturación\Factur.exe ", vbMaximizedFocus) End Sub Cambia la ruta y el ejecutable y listo. Si te ha valido la respuesta.

Es raro, el código funciona correctamente. ¿Dónde tienes colocado el código? ¿Así? Private Sub TextBox7_Exit(ByVal Cancel As MSForms.ReturnBoolean) Dim FechaInicio As Date, FechaFin As Date, n As Integer FechaInicio = TextBox7.Text FechaFin = Date If...

Este enlace te ayudará. http://es.wikihow.com/utilizar-Macros-en-Excel