galileogali

Sub recuperar() Application.CommandBars("worksheet menu bar").Reset End Sub Hace correr esto

Sub cargarcaracter() Dim rng As New Range, cel As Range Set rng = Range("A1:A450") For Each cel In rng.Cells If cel.HasFormula Then Else cel.Formula = "'" & cel.Formula End If Next cel End Sub Sobre como hacer un botón ya aparecerán candidatos a...

Desde ya que se puede hacer, pero es más fácil que Agregar (Add) el Shape, jugar con la propiedad visible=false o true y el texto con algo como esto: Sub cargar_nombre() Shapes("Elipse 1").TextFrame.Characters.Text = "Tomás" End Sub

Generalmente las funciones ELEGIR y BUSCARV resuelven el problema, trae tu caso

Acá esta una de las mejores páginas sobre este tema www.rondebruin.nl

Sub test1() buscado = Application.InputBox("Indique su busqueda", Type:=2) If buscado = "" Then Exit Sub Set resp = Cells.Find(What:=buscado, After:=ActiveCell, LookIn:=xlFormulas, _ LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _...

Seria bueno que expliques cual es le método con el que has establecido tu calculo, para poder elaborar algo que RECTIFIQUE a SIFECHA

Hay una sola manera para que ocurra esto: que exista una macro de Evento Change: Worksheet_Change o Workbook_SheetChange Otra posibilidad remotisima es que el Evento Onkey se hubiera definido para las teclas Enter o Flecha a derecha a abajo

El tema implica un desarrollo, hasta que te encuentre algo ya armado, para brindarte, y si lo que quieres es aprender, te sugiero, ver los siguientes temas en Google Userform VBA Userform1.show Textbox vba Combobox vba Con esta tarea hecha, intenta...

Aquí vas a encontrar una manera que presento uno de los expertos de mi sitio: http://excelgali.mejorforo.net/controles-ocx-dll-f10/timer-control-t76.htm Es la mejor respuesta que haya visto, porque evita el titilar y da libertad para seguir...