I would like to delete the current content/value of the cells

3,6 .... 3,18

How can I do this within a *.vbs script?

Claudia

Hi,

What does '3,6 .... 3,18' mean? Are you say you want to delete all values in
the range 3.6 to 3.18?

Mike

"Claudia d'Amato" wrote:

I would like to delete the current content/value of the cells

3,6 .... 3,18

How can I do this within a *.vbs script?

Claudia

i guess she means X,Y so third column , sixth cell and cell eighteen



"Mike H" schreef in bericht
...
Hi,

What does '3,6 .... 3,18' mean? Are you say you want to delete all values
in
the range 3.6 to 3.18?

Mike

"Claudia d'Amato" wrote:

I would like to delete the current content/value of the cells

3,6 .... 3,18

How can I do this within a *.vbs script?

Claudia

"Claudia d'Amato" wrote in message
...
I would like to delete the current content/value of the cells

3,6 .... 3,18

How can I do this within a *.vbs script?

Claudia



create a Macro in Excel.

this is a very basic example that sticks "hello in rows 2 to 20 of column A.

For i = 2 To 20

Range("A" & i).Value = "hello"

Next



Now if I wanted to blank this range, I'd just change the line to this.

Range("A" & i).Value = ""

Changing all the values to blank.
Just play about with it until you get what you want.

Dave

Does this mean Row 3, column 6 to Row 3, column 18?

And you really mean a VBS script?

If yes to both, then this worked ok for me:

================

Dim xlApp
Dim xlWks

Set xlApp = CreateObject("Excel.application")
'xlApp.Visible = True
Set xlWks = xlApp.Workbooks.Open("C:\book1.xls").Worksheets(1)

xlWks.Range("F3").Resize(1, 13).ClearContents

xlWks.Parent.Close True

xlApp.Quit

Set xlWks = Nothing
Set xlApp = Nothing

=================
It's nice to see what's happening when you're debugging. That's why I kept the
..visible line in the pasted code.


Claudia d'Amato wrote:

I would like to delete the current content/value of the cells

3,6 .... 3,18

How can I do this within a *.vbs script?

Claudia

--

Dave Peterson

try
range(cells(3,6),cells(3,18)).clearcontents
--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Claudia d'Amato" wrote in message
...
I would like to delete the current content/value of the cells

3,6 .... 3,18

How can I do this within a *.vbs script?

Claudia

Il giorno 21 Jun 2008 05:07:45 GMT, (Claudia d'Amato) ha scritto:

I would like to delete the current content/value of the cells

3,6 .... 3,18

How can I do this within a *.vbs script?

Not (totally) tested:

xl.Range(xl.Cells(3,6), xl.Cells(3,18)).ClearContents


And how to do something similar on the xls dropped on the vbs.


Set objArgs = WScript.Arguments 'Vedo se c'è almeno un argomento passato allo script
If objargs.count=0 Then 'altrimenti mostro come si usa il programma
msg= "Trascinare un file xls sull'icona del programma "
msgbox msg ,,Title
wscript.quit
End If
Filename= objArgs(0)
Set xl=CreateObject("excel.application")
xl.Visible=True
xl.Workbooks.Open Filename

FromRow=3
ToRow=3
FromColumn=6
ToColumn=18
For MyRow= fromRow to ToRow
For myColumn=fromColumn to ToColumn
cells(myRow,MyColumn)=""
next
Next

--
Giovanni Cenati (Bergamo, Italy)
Write to "Reventlov" at katamail com
http://digilander.libero.it/Cenati (Esempi e programmi in VbScript)
--