Download
Magazine
Develop
Account
Download
Magazine
Develop
Login
Forgot Account/Password
Create Account
Language
Help
Language
Help
×
Login
Login Name
Password
×
Forgot Account/Password
Category:
Software
People
PersonalForge
Magazine
Wiki
Search
OSDN
>
Find Software
>
Software Development
>
Interpreters
>
DMonkey
>
Ticket List/Search
>
Ticket #4151
DMonkey
Description
Project Summary
Developer Dashboard
Web Page
Developers
Image Gallery
List of RSS Feeds
Activity
Statistics
History
Downloads
List of Releases
Stats
Source Code
Code Repository list
CVS
View Repository
Ticket
Ticket List
Milestone List
Type List
Component List
List of frequently used tickets/RSS
Submit New Ticket
Documents
Communication
Forums
List of Forums
Help (8)
Open Discussion (26)
Users (0)
Mailing Lists
list of ML
dmonkey-dev
News
Ticket #4151
Ticket List
Submit New Ticket
RSS
ActiveXオートメーションでExcelが上手く操作できない
Open Date:
2004-04-07 01:02
Last Update:
2004-04-07 01:02
monitor
ON
OFF
Reporter:
zab
Owner:
(None)
Type:
Bugs
Status:
Open
Component:
(None)
MileStone:
(None)
Priority:
5 - Medium
Severity:
5 - Medium
Resolution:
None
File:
None
Details
Reply
下記、コードにてエクセルのセルに文字列を入力したいが
全ての表示が1行目になってしまう。
// エクセルにデータを入力するテスト
var excelapp = WScript.CreateObject
("Excel.Application");
excelapp.Workbooks.Add(); // 新シート作成
excelapp.Visible = true; // excelを表示
var sheet = excelapp.Worksheets('sheet1');
for (var col = 1; col <= 10; col++)
{
for (var row = 1; row <= 30; row++)
{
var value = "座標(" + row + "," + col + ")";
sheet.Cells(row, col).Value = value;
}
}
Ticket History (0/0 Histories)
Attachment File List (
0
)
Attachment File List
No attachments
Edit
Add Comment
You are not logged in.
I you are not logged in, your comment will be treated as an anonymous post. »
Login
Add Comment
Preview
Submit
全ての表示が1行目になってしまう。
// エクセルにデータを入力するテスト
var excelapp = WScript.CreateObject
("Excel.Application");
excelapp.Workbooks.Add(); // 新シート作成
excelapp.Visible = true; // excelを表示
var sheet = excelapp.Worksheets('sheet1');
for (var col = 1; col <= 10; col++)
{
for (var row = 1; row <= 30; row++)
{
var value = "座標(" + row + "," + col + ")";
sheet.Cells(row, col).Value = value;
}
}