srmsdl

duainsulch respondió: ¿Q version de excel usas?

Juan Carlos González Chavarría respondió: No veo ninguna rutina que le diga a tú código cuántas hojas existen en tu libro. Dim SheetCount As Integer Dim i As Integer If ActiveWorkbook Is Nothing Then Exit Sub ' No hay libro activo SheetCount = ActiveWorkbook.Sheets.Count ReDim SheetNames(1...

Anónimo respondió: Probá en lugar de HojaX con Sheets(X).Cells(...) Saludos Gustavo PD: si no te da lo repensamos directamente porque no estoy seguro si al X ser numérico te lo va a reconocer bien...

duainsulch respondió: Para excel 2007 (para versiones anteriores creo que es igual): Hoja1.Cells(cont, 1) = thisworkbook. Worksheets(x). Cells(25, 1) Asi el worksheets(x) hace referencia al numero de hoja que se ocupa en el libro, de forma q la primera hoja es la 1 y asi...

leone respondió: Me parece que esta pregunta esta repetida, de todas formas te la vuelvo a enviar. Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) If KeyAscii = 13 Then KeyAscii = 0 SendKeys "{tab}" ElseIf KeyAscii <> 8 Then If Not...