回答編集履歴
5
$workBook.Worksheetsに変更
test
CHANGED
@@ -10,7 +10,7 @@
|
|
10
10
|
|
11
11
|
セルに書き込みを行う必要があります。
|
12
12
|
|
13
|
-
$Worksheet.Cell("B1").Value = "Hello world"
|
13
|
+
$workBook.Worksheets.Cell("B1").Value = "Hello world"
|
14
14
|
|
15
15
|
|
16
16
|
|
@@ -20,7 +20,7 @@
|
|
20
20
|
|
21
21
|
以下にすることで、B2セルに「140017」と入れられるでしょう。
|
22
22
|
|
23
|
-
$Worksheet.Cell("B2").FormulaA1 = "A2";
|
23
|
+
$workBook.Worksheets.Cell("B2").FormulaA1 = "A2";
|
24
24
|
|
25
25
|
|
26
26
|
|
@@ -28,7 +28,7 @@
|
|
28
28
|
|
29
29
|
こんな感じでいけるんじゃないかと思っています。
|
30
30
|
|
31
|
-
$Worksheet.Cell("B2").FormulaA1 = "RHB="&A2
|
31
|
+
$workBook.Worksheets.Cell("B2").FormulaA1 = "RHB="&A2
|
32
32
|
|
33
33
|
|
34
34
|
|
@@ -44,11 +44,11 @@
|
|
44
44
|
|
45
45
|
|
46
46
|
|
47
|
-
$Worksheet.Cell("B2").FormulaA1 = "`"RHB`"=&A2"
|
47
|
+
$workBook.Worksheets.Cell("B2").FormulaA1 = "`"RHB`"=&A2"
|
48
48
|
|
49
|
-
$Worksheet.Cell("B3").FormulaA1 = "`"RHB`"=&A3"
|
49
|
+
$workBook.Worksheets.Cell("B3").FormulaA1 = "`"RHB`"=&A3"
|
50
50
|
|
51
|
-
$Worksheet.Cell("B4").FormulaA1 = "`"RHB`"=&A4"
|
51
|
+
$workBook.Worksheets.Cell("B4").FormulaA1 = "`"RHB`"=&A4"
|
52
52
|
|
53
53
|
|
54
54
|
|
4
コード修正
test
CHANGED
@@ -59,3 +59,17 @@
|
|
59
59
|
```
|
60
60
|
|
61
61
|
こんな感じになりそう…
|
62
|
+
|
63
|
+
|
64
|
+
|
65
|
+
■追記
|
66
|
+
|
67
|
+
「1 140017」なのですね。
|
68
|
+
|
69
|
+
```PowerShell
|
70
|
+
|
71
|
+
"`"RHB`"&MID(A2,3,LEN(A2))"
|
72
|
+
|
73
|
+
```
|
74
|
+
|
75
|
+
(MID関数が使えるのかしら…)
|
3
サンプルコード挿入
test
CHANGED
@@ -36,12 +36,26 @@
|
|
36
36
|
|
37
37
|
```PowerShell
|
38
38
|
|
39
|
+
$workBook = new-object ClosedXML.Excel.XLWorkbook
|
40
|
+
|
41
|
+
#取得データをExcelに出力
|
42
|
+
|
43
|
+
[void]$workBook.Worksheets.Add($dtSet.Tables[0],"Sheet1")
|
44
|
+
|
45
|
+
|
46
|
+
|
39
47
|
$Worksheet.Cell("B2").FormulaA1 = "`"RHB`"=&A2"
|
40
48
|
|
41
49
|
$Worksheet.Cell("B3").FormulaA1 = "`"RHB`"=&A3"
|
42
50
|
|
43
51
|
$Worksheet.Cell("B4").FormulaA1 = "`"RHB`"=&A4"
|
44
52
|
|
53
|
+
|
54
|
+
|
55
|
+
#Excelの保存
|
56
|
+
|
57
|
+
[void]$workBook.SaveAs($excelPath);
|
58
|
+
|
45
59
|
```
|
46
60
|
|
47
61
|
こんな感じになりそう…
|
2
エスケープ修正
test
CHANGED
@@ -34,6 +34,14 @@
|
|
34
34
|
|
35
35
|
※ "はエスケープが必要かもしれません。
|
36
36
|
|
37
|
+
```PowerShell
|
38
|
+
|
37
|
-
"`"RHB`"=&A2"
|
39
|
+
$Worksheet.Cell("B2").FormulaA1 = "`"RHB`"=&A2"
|
40
|
+
|
41
|
+
$Worksheet.Cell("B3").FormulaA1 = "`"RHB`"=&A3"
|
42
|
+
|
43
|
+
$Worksheet.Cell("B4").FormulaA1 = "`"RHB`"=&A4"
|
44
|
+
|
45
|
+
```
|
38
46
|
|
39
47
|
こんな感じになりそう…
|
1
エスケープ修正
test
CHANGED
@@ -34,6 +34,6 @@
|
|
34
34
|
|
35
35
|
※ "はエスケープが必要かもしれません。
|
36
36
|
|
37
|
-
|
37
|
+
"`"RHB`"=&A2"
|
38
38
|
|
39
39
|
こんな感じになりそう…
|