No one knows about my last Thread?

[Erick de la Torre]

Hy, everybody. I´m trying to show on my Standard form the format cells of Excel(locate into an Excel cell and then push Ctrl+1), I'm using an ole from VB to Excel like this:


'********** I M P O R T A N T
'********** U must have to go to the project references and select the Microsoft Excel 9.0 or 8.0 Object Library

'----------- VB code
Option Explicit
Dim xlsApp As Excel.Application

Private Sub Command1_Click()

Hy, everyone. I´m trying to show on my Standard form the format cells of Excel(locate into an Excel cell and then push Ctrl+1), I'm using an ole from VB to Excel like this:


'********** I M P O R T A N T
'********** U must have to go to the project references and select the Microsoft Excel 9.0 or 8.0 Object Library

'----------- VB code
Option Explicit
Dim xlsApp As Excel.Application

Private Sub Command1_Click()

Set xlsApp = Excel.Application
With xlsApp
'Show Excel
.Visible = True
'Create a new workbook
.Workbooks.Add
'Put text in to the cell that is selected
.ActiveCell.Value = "123"

'Put text into A3 regardless of the selected cell
.Range("A3").Value = "456"
'----------- VB code

My question is: How can i show the format cells that appears in Excell


Thanx everyone for reply

[Jop]

*wow* you don't have any patience huh? you only post it less than an hour after your first post huh?

I'm sorry but I can't help you, at least this post is back on top again

[CthulhuDragon]

Its been all of a half hour since your last post! What happened to patience? Many of the people who would be able to help you are at work (I know I am) and can only check the posts periodically. If somebody can help you I'm sure they will as soon as they can.

[CthulhuDragon]

Oops Jop beat me to the reply.

[Jop]

hehe

[Erick de la Torre]

Now I wait about 3 hours, but thanx everybody for reply. I'm still working with it. If could finish that **** i will share it.






See u later

[Erick de la Torre]

Ok, i understand, what i'm trying to do is difficult






See u

[Jop]

A few tips for future posts.

- Never say you're a Guru in the Subject of your post
- When posting code type [ code ] Your code here [ /code ]

(Remove the spaces between the brackets and you'll get this)

'********** I M P O R T A N T 
'********** U must have to go to the project references and select the Microsoft Excel 9.0 or 8.0 Object Library 

'----------- VB code 
Option Explicit 
Dim xlsApp As Excel.Application 

Private Sub Command1_Click() 

Hy, everyone. I´m trying to show on my Standard form the format cells of Excel(locate into an Excel cell and then push Ctrl+1), I'm using an ole from VB to Excel like this: 


'********** I M P O R T A N T 
'********** U must have to go to the project references and select the Microsoft Excel 9.0 or 8.0 Object Library 

'----------- VB code 
Option Explicit 
Dim xlsApp As Excel.Application 

Private Sub Command1_Click() 

Set xlsApp = Excel.Application 
With xlsApp 
'Show Excel 
.Visible = True 
'Create a new workbook 
.Workbooks.Add 
'Put text in to the cell that is selected 
.ActiveCell.Value = "123" 

'Put text into A3 regardless of the selected cell 
.Range("A3").Value = "456" 
'----------- VB code

Hey it's on top again, goodluck