回答編集履歴
5
$workBook.Worksheetsに変更
answer
CHANGED
|
@@ -4,16 +4,16 @@
|
|
|
4
4
|
ここは合っています。
|
|
5
5
|
|
|
6
6
|
セルに書き込みを行う必要があります。
|
|
7
|
-
$
|
|
7
|
+
$workBook.Worksheets.Cell("B1").Value = "Hello world"
|
|
8
8
|
|
|
9
9
|
と記載すると、B1のセルにHello worldが挿入されます。この要領で、B1に数式を挿入します。
|
|
10
10
|
|
|
11
11
|
以下にすることで、B2セルに「140017」と入れられるでしょう。
|
|
12
|
-
$
|
|
12
|
+
$workBook.Worksheets.Cell("B2").FormulaA1 = "A2";
|
|
13
13
|
|
|
14
14
|
|
|
15
15
|
こんな感じでいけるんじゃないかと思っています。
|
|
16
|
-
$
|
|
16
|
+
$workBook.Worksheets.Cell("B2").FormulaA1 = "RHB="&A2
|
|
17
17
|
|
|
18
18
|
※ "はエスケープが必要かもしれません。
|
|
19
19
|
```PowerShell
|
|
@@ -21,9 +21,9 @@
|
|
|
21
21
|
#取得データをExcelに出力
|
|
22
22
|
[void]$workBook.Worksheets.Add($dtSet.Tables[0],"Sheet1")
|
|
23
23
|
|
|
24
|
-
$
|
|
24
|
+
$workBook.Worksheets.Cell("B2").FormulaA1 = "`"RHB`"=&A2"
|
|
25
|
-
$
|
|
25
|
+
$workBook.Worksheets.Cell("B3").FormulaA1 = "`"RHB`"=&A3"
|
|
26
|
-
$
|
|
26
|
+
$workBook.Worksheets.Cell("B4").FormulaA1 = "`"RHB`"=&A4"
|
|
27
27
|
|
|
28
28
|
#Excelの保存
|
|
29
29
|
[void]$workBook.SaveAs($excelPath);
|
4
コード修正
answer
CHANGED
|
@@ -28,4 +28,11 @@
|
|
|
28
28
|
#Excelの保存
|
|
29
29
|
[void]$workBook.SaveAs($excelPath);
|
|
30
30
|
```
|
|
31
|
-
こんな感じになりそう…
|
|
31
|
+
こんな感じになりそう…
|
|
32
|
+
|
|
33
|
+
■追記
|
|
34
|
+
「1 140017」なのですね。
|
|
35
|
+
```PowerShell
|
|
36
|
+
"`"RHB`"&MID(A2,3,LEN(A2))"
|
|
37
|
+
```
|
|
38
|
+
(MID関数が使えるのかしら…)
|
3
サンプルコード挿入
answer
CHANGED
|
@@ -17,8 +17,15 @@
|
|
|
17
17
|
|
|
18
18
|
※ "はエスケープが必要かもしれません。
|
|
19
19
|
```PowerShell
|
|
20
|
+
$workBook = new-object ClosedXML.Excel.XLWorkbook
|
|
21
|
+
#取得データをExcelに出力
|
|
22
|
+
[void]$workBook.Worksheets.Add($dtSet.Tables[0],"Sheet1")
|
|
23
|
+
|
|
20
24
|
$Worksheet.Cell("B2").FormulaA1 = "`"RHB`"=&A2"
|
|
21
25
|
$Worksheet.Cell("B3").FormulaA1 = "`"RHB`"=&A3"
|
|
22
26
|
$Worksheet.Cell("B4").FormulaA1 = "`"RHB`"=&A4"
|
|
27
|
+
|
|
28
|
+
#Excelの保存
|
|
29
|
+
[void]$workBook.SaveAs($excelPath);
|
|
23
30
|
```
|
|
24
31
|
こんな感じになりそう…
|
2
エスケープ修正
answer
CHANGED
|
@@ -16,5 +16,9 @@
|
|
|
16
16
|
$Worksheet.Cell("B2").FormulaA1 = "RHB="&A2
|
|
17
17
|
|
|
18
18
|
※ "はエスケープが必要かもしれません。
|
|
19
|
+
```PowerShell
|
|
19
|
-
"`"RHB`"=&A2"
|
|
20
|
+
$Worksheet.Cell("B2").FormulaA1 = "`"RHB`"=&A2"
|
|
21
|
+
$Worksheet.Cell("B3").FormulaA1 = "`"RHB`"=&A3"
|
|
22
|
+
$Worksheet.Cell("B4").FormulaA1 = "`"RHB`"=&A4"
|
|
23
|
+
```
|
|
20
24
|
こんな感じになりそう…
|
1
エスケープ修正
answer
CHANGED
|
@@ -16,5 +16,5 @@
|
|
|
16
16
|
$Worksheet.Cell("B2").FormulaA1 = "RHB="&A2
|
|
17
17
|
|
|
18
18
|
※ "はエスケープが必要かもしれません。
|
|
19
|
-
|
|
19
|
+
"`"RHB`"=&A2"
|
|
20
20
|
こんな感じになりそう…
|