Visual Basic - como lo hago

Hola, tengo una planilla de exel en donde en una celda tengo un numero y necesito que cada vez que yo habra el archivo a ese numero se le sume 1, por ejemplo: si tengo el numero 25, al abrirlo que me aparesca automaticamente el numero 26. y como hago para que de algunas celdas me guarde en otro documento unas cadenas de textos. se que lo puedo realizar en visual basic, pero recien estoy empezando.
gracias

tienes que hacerlo con las famosas macros.
vete a:
Herramientas/Macros/Editor de Visual Basic ,
ahi eliges ThisWorkbook click derecho y Ver código
y se te mostrará un segmento similar a :
Private Sub Workbook_Open()
End Sub

donde debes poner todo tucodigo que se va a ejecutar cada vez que abres tu archivo de excel ejm:

Private Sub Workbook_Open()
MsgBox "Hello World"
End Sub

Este no es un foro de Excel, ni siquiera de VBA.
me parece que lo que pregunta es como se hace desde Visual Basic y por codigo.

Tienes razon no entendi muy bien la pregunta en todo caso aclarame unas dudas:

Quieres que el contador aumente cada vez que lo abras?

Enonces quizas lo que quieras es que cada vez que tu aplicacion y solo tu aplicacion lo abra este contador aumente, de tal modo que si lo abre otro Usuario, si lo abren del otra PC en la red o si lo abren desde otra Aplicacion simplemente este contador no va a aumentarse, pues si es asi haberlo idcho antes, creo que basta con hacer

Count = Count + 1

Ahora te preguntaras en Count en donde se lo inicializa para que empieze en 0 y asi vaya incrementandose, pues te recomiendo que uese el RegEdit ahi guardas el count y la proxima vez que tu aplicacion quiera abrir tu archivo buscas el valos del Count en el regedit y simplemente pegas este codigo:

Count = Count + 1 ' Por si no entiendes este codigo te lo explico la proxima

a claro que luego de incrementado tienes que guardar el valor de Count como ya dije en el regEdit,

Ahora si espero haber entendido tu pregunta y si no es asi pues seguiremos intentado comunicarnos

Dim Excel As Object, Workbook As Object, Worksheet As Object
Private Sub Form_Load()
Set Excel = CreateObject("Excel.Application")

Excel.Visible = True

Set Workbook = Excel.Workbooks.Open(App.Path & "\Prueba.xls")
Set Worksheet = Workbook.ActiveSheet

Text1.Text = Worksheet.Cells(1, 1).Value
Text2.Text = Worksheet.Cells(1, 2).Value
Text3.Text = Worksheet.Cells(1, 3).Value
Text4.Text = Worksheet.Cells(4, 5).Value
End Sub

Private Sub Form_Unload(Cancel As Integer)
Worksheet.Cells(1, 1).Value = Val(Text1.Text) + 1
Set obj_Workbook = Nothing
Set obj_Excel = Nothing
Set obj_Worksheet = Nothing
End Sub

Fijate si es esto lo que queres , bien no te entendi , pero si no es esto fijate en VBA
suerte