【1 OSの種類 .】 Windows**
【2 Excelのバージョン 】 Excel**
【3 VBAが使えるか .】 はい･いいえ
【4 VBAでの回答の可否】 可･否
▼━関連スレ━━━━━━━━━━━━
前スレ
Excel総合相談所
https://find.5ch.net/search?q=excel
Excel VBA 質問スレ
https://find.5ch.net/search?q=excel+vba
【質問不可】Excel総合相談所スレの雑談・議論スレ
https://find.5ch.net/search?q=excel+%E3%80%80%E7%9B%B8%E8%AB%87%E6%89%80
探検
Excel総合相談所 137
■ このスレッドは過去ログ倉庫に格納されています
1名無しさん＠そうだ選挙にいこう
2019/10/08(火) 20:06:19.402019/11/08(金) 21:03:50.73
>>437
間違ってるぞ
間違ってるぞ
439名無しさん＠そうだ選挙にいこう
2019/11/08(金) 21:17:19.45 >>437
9行目訂正
.Range(.Cells(rs, 1), .Cells(rs + 8, 9)) = Workbooks(mybook).Worksheets("sheet1").Range("B2;j10")
9行目訂正
.Range(.Cells(rs, 1), .Cells(rs + 8, 9)) = Workbooks(mybook).Worksheets("sheet1").Range("B2;j10")
440名無しさん＠そうだ選挙にいこう
2019/11/08(金) 21:35:54.93 >>439
すまん、二度目の訂正
.Range(.Cells(rs, 1), .Cells(rs + 8, 9)).Value = Workbooks(mybook).Worksheets("sheet1").Range("B2;j10").Value
すまん、二度目の訂正
.Range(.Cells(rs, 1), .Cells(rs + 8, 9)).Value = Workbooks(mybook).Worksheets("sheet1").Range("B2;j10").Value
441名無しさん＠そうだ選挙にいこう
2019/11/08(金) 22:07:12.84 A B C D
1
2
3
4
を
1 2 3 4
A
B
C
D
にしたいんだけど無理ですか？
1
2
3
4
を
1 2 3 4
A
B
C
D
にしたいんだけど無理ですか？
2019/11/08(金) 22:17:42.62
>>441
1行目を右に1個ずらす→表全体をコピー→形式を選択して貼り付けで行列入れ替えを選ぶ
1行目を右に1個ずらす→表全体をコピー→形式を選択して貼り付けで行列入れ替えを選ぶ
443名無しさん＠そうだ選挙にいこう
2019/11/08(金) 22:24:45.22 >>442
ありがとう。
データが90度回転状態になった！
枠を入れ替えたいんだわ
氏名1 氏名2 氏名3 氏名4
住所1 住所2 住所3 住所4
電話1 電話2 電話3 電話4
日付1 日付2 日付3 日付4
みたく
ありがとう。
データが90度回転状態になった！
枠を入れ替えたいんだわ
氏名1 氏名2 氏名3 氏名4
住所1 住所2 住所3 住所4
電話1 電話2 電話3 電話4
日付1 日付2 日付3 日付4
みたく
444名無しさん＠そうだ選挙にいこう
2019/11/08(金) 22:31:10.53 >>435
Sub copipe()
Dim mybook As Variant, rs As Long, wb As Variant
mybook = Dir("Z:\*.xlsx")
Do Until mybook = ""
wb = mybook
mybook = Dir
Workbooks.Open ("Z:\" & wb)
With Workbooks("book1.xlsm").Worksheets("sheet1")
rs = .Cells(.Cells.Rows.Count, "A").End(xlUp).Offset(1).Row
.Range(.Cells(rs, 1), .Cells(rs + 8, 9)).Value = _
Workbooks(wb).Worksheets("sheet1").Range("B2:j10").Value
End With
Workbooks(wb).Close
Loop
End Sub
何回も訂正して悪い
エラーチェック済だからこれでいける
Sub copipe()
Dim mybook As Variant, rs As Long, wb As Variant
mybook = Dir("Z:\*.xlsx")
Do Until mybook = ""
wb = mybook
mybook = Dir
Workbooks.Open ("Z:\" & wb)
With Workbooks("book1.xlsm").Worksheets("sheet1")
rs = .Cells(.Cells.Rows.Count, "A").End(xlUp).Offset(1).Row
.Range(.Cells(rs, 1), .Cells(rs + 8, 9)).Value = _
Workbooks(wb).Worksheets("sheet1").Range("B2:j10").Value
End With
Workbooks(wb).Close
Loop
End Sub
何回も訂正して悪い
エラーチェック済だからこれでいける
2019/11/08(金) 22:46:13.51
2019/11/08(金) 23:03:47.63
2019/11/08(金) 23:11:56.48
>>444
元のままでいい部分までややこしく変えなくてもいいんじゃないの…
元のままでいい部分までややこしく変えなくてもいいんじゃないの…
2019/11/08(金) 23:15:08.62
2019/11/08(金) 23:17:47.89
さらに本来の列と行番号の部分を非表示にすればそれっぽくなるぞ
2019/11/08(金) 23:21:03.97
まあ、ディスプレイを90度回転させればいいだけなんだけどね。
451名無しさん＠そうだ選挙にいこう
2019/11/08(金) 23:53:48.112019/11/09(土) 05:24:43.96
2019/11/09(土) 09:29:40.70
>>450
そのままの意味で力技だな
そのままの意味で力技だな
2019/11/09(土) 10:34:50.37
>>436,444
早速RESありがとうございます。
444さんのマクロ試してみましたがうまくいかないようです。
私の説明がまずかったのだと思いますが、実際にやりたいことは以下のようなことです。
http://nanpre.adg5.com/xlsx_down.php
このページのナンプレを10問ダウンロードして問題の部分だけ（B2:J2）を
http://iup.2ch-library.com/i/i2024927-1573263001.jpg
このファイルのA2:I100まで10行ごとに1行開けてペーストしたいのですが
ご教授下さい。
早速RESありがとうございます。
444さんのマクロ試してみましたがうまくいかないようです。
私の説明がまずかったのだと思いますが、実際にやりたいことは以下のようなことです。
http://nanpre.adg5.com/xlsx_down.php
このページのナンプレを10問ダウンロードして問題の部分だけ（B2:J2）を
http://iup.2ch-library.com/i/i2024927-1573263001.jpg
このファイルのA2:I100まで10行ごとに1行開けてペーストしたいのですが
ご教授下さい。
455名無しさん＠そうだ選挙にいこう
2019/11/09(土) 11:23:42.68 >>454
Sub copipe()
Dim myPath As String, mybook As Variant, rs As Long
myPath = "Z:\"
mybook = Dir(myPath & "*.xlsx")
With Workbooks("aaa.xlsm").Worksheets("sheet1")
Do Until mybook = ""
Workbooks.Open (myPath & mybook)
rs = .Cells(.Cells.Rows.Count, "A").End(xlUp).Offset(2).Row
If rs = 3 Then
rs = 2
End If
.Cells(rs - 1, 1).Value = .Range("K1").Value
Workbooks(mybook).Worksheets("sheet1").Range("B2:j10").Copy .Cells(rs, 1)
Workbooks(mybook).Close
mybook = Dir()
Loop
.Range("A1:I100").ColumnWidth = ColumnWidth + 4
.Range("A1:I100").RowHeight = RowHeight + 28
End With
End Sub
1行開けのスペースの場所にある上級〜の文字はペーストするシートのK1に文字を入力したら同じ文字ばかりだけど入力される
Sub copipe()
Dim myPath As String, mybook As Variant, rs As Long
myPath = "Z:\"
mybook = Dir(myPath & "*.xlsx")
With Workbooks("aaa.xlsm").Worksheets("sheet1")
Do Until mybook = ""
Workbooks.Open (myPath & mybook)
rs = .Cells(.Cells.Rows.Count, "A").End(xlUp).Offset(2).Row
If rs = 3 Then
rs = 2
End If
.Cells(rs - 1, 1).Value = .Range("K1").Value
Workbooks(mybook).Worksheets("sheet1").Range("B2:j10").Copy .Cells(rs, 1)
Workbooks(mybook).Close
mybook = Dir()
Loop
.Range("A1:I100").ColumnWidth = ColumnWidth + 4
.Range("A1:I100").RowHeight = RowHeight + 28
End With
End Sub
1行開けのスペースの場所にある上級〜の文字はペーストするシートのK1に文字を入力したら同じ文字ばかりだけど入力される
2019/11/09(土) 13:48:49.20
これでいいんじゃないの
sub copipe()
Dim Path As String, myBook As String
Dim rowNo as long
myPath = "Z:\"
myBook = Dir(myPath & "*.xlsx")
rowNo = 1
Do Until myBook = ""
Workbooks.Open myPath & myBook
Workbooks(myBook).Worksheets("Sheet1").Range("B2:J10").Copy Range("A" & rowNo + 1)
Workbooks(myBook).Close
rowNo = rowNo + 10
myBook = Dir
Loop
End Sub
aaa..xlsmのシートモジュールに書く
タイトルが欲しければループの1行目にRange("A" & rowNo).Value = myBookでも入れておけばいい
sub copipe()
Dim Path As String, myBook As String
Dim rowNo as long
myPath = "Z:\"
myBook = Dir(myPath & "*.xlsx")
rowNo = 1
Do Until myBook = ""
Workbooks.Open myPath & myBook
Workbooks(myBook).Worksheets("Sheet1").Range("B2:J10").Copy Range("A" & rowNo + 1)
Workbooks(myBook).Close
rowNo = rowNo + 10
myBook = Dir
Loop
End Sub
aaa..xlsmのシートモジュールに書く
タイトルが欲しければループの1行目にRange("A" & rowNo).Value = myBookでも入れておけばいい
457454
2019/11/09(土) 14:51:13.52 >>455,456
速攻RESありがとうございました
早速やってみましたが、455さんのマクロの場合、"aaa.xlsmのsheet1に全くペーストできないです
マクロは動いているようなのですが、コピーペーストができないです。
456さんの場合オープンしたファイルに次々とペーストされていくようです。
また、Workbooks(myBook).Closeの記述があるのですがオープンしたファイルを保存するかどうか一つずつ聞いてきます。
速攻RESありがとうございました
早速やってみましたが、455さんのマクロの場合、"aaa.xlsmのsheet1に全くペーストできないです
マクロは動いているようなのですが、コピーペーストができないです。
456さんの場合オープンしたファイルに次々とペーストされていくようです。
また、Workbooks(myBook).Closeの記述があるのですがオープンしたファイルを保存するかどうか一つずつ聞いてきます。
2019/11/09(土) 15:17:21.89
>>441 443
TRANSPOSE 関数
https://support.office.com/ja-jp/article/transpose-%e9%96%a2%e6%95%b0-ed039415-ed8a-4a81-93e9-4b6dfac76027?omkt=ja-JP&;ui=ja-JP&rs=ja-JP&ad=JP
TRANSPOSE 関数
https://support.office.com/ja-jp/article/transpose-%e9%96%a2%e6%95%b0-ed039415-ed8a-4a81-93e9-4b6dfac76027?omkt=ja-JP&;ui=ja-JP&rs=ja-JP&ad=JP
2019/11/09(土) 16:32:33.93
2019/11/09(土) 16:36:09.45
2019/11/09(土) 18:13:17.82
462名無しさん＠そうだ選挙にいこう
2019/11/09(土) 22:36:53.48 >>448
人物の公開プロフィールやDVDのデータをデータベース化する場合や、
例えば、
http://www.helloproject.com/morningmusume/profile/mizuki_fukumura/
http://www.helloproject.com/morningmusume/profile/erina_ikuta/
https://www.a
mazon.co.jp/gp/product/B01BTGDP3M/
の1人や1作品の登録データをまるごと1回でコピーしてExcelに貼ってを繰り返してデータ化するには、横軸に数字で
縦軸の項目はせいぜい15個くらいの横長の表のほうがいい。
人物の公開プロフィールやDVDのデータをデータベース化する場合や、
例えば、
http://www.helloproject.com/morningmusume/profile/mizuki_fukumura/
http://www.helloproject.com/morningmusume/profile/erina_ikuta/
https://www.a
mazon.co.jp/gp/product/B01BTGDP3M/
の1人や1作品の登録データをまるごと1回でコピーしてExcelに貼ってを繰り返してデータ化するには、横軸に数字で
縦軸の項目はせいぜい15個くらいの横長の表のほうがいい。
2019/11/09(土) 23:04:22.86
2019/11/09(土) 23:45:13.42
スマホ版だとPC版で変更したフォント（フリーのダウンロードしたやつ）は反映させられないのだろうか？
2019/11/09(土) 23:54:44.34
PC版でもPCに入れてないフォントは反映されないぞ
2019/11/10(日) 00:27:12.02
>>465
スマホにも同じフォント入れたはずなんだよね
スマホにも同じフォント入れたはずなんだよね
2019/11/10(日) 10:25:15.33
自分で作った色、例えばピンク RGB(255,204,255)は別のPCのExcelには初めから設定されていないので、その他の色、ユーザー設定でRGBを設定して新たに色を作らなければなりませんが、
それを自動で設定してリボンのフォント、最近使用した色のパレットに設定するマクロありますか？
指定した色の付いたセルで分岐させたいのですが
それを自動で設定してリボンのフォント、最近使用した色のパレットに設定するマクロありますか？
指定した色の付いたセルで分岐させたいのですが
468名無しさん＠そうだ選挙にいこう
2019/11/10(日) 12:41:54.082019/11/10(日) 12:51:20.75
>>467
マクロ使わなくても、その他の色→OKで履歴に入るよ
マクロ使わなくても、その他の色→OKで履歴に入るよ
2019/11/10(日) 13:59:14.04
2019/11/10(日) 15:27:51.28
ブックに掛かってるパスワード無視して内容読み込むって出来る？
暗号解読ソフト使うとかじゃなくてVBAで
暗号解読ソフト使うとかじゃなくてVBAで
2019/11/10(日) 15:40:53.73
2019/11/10(日) 15:46:27.48
>>471
パスが分かってるのか分からないのかで対応が違う
パスが分かってるのか分からないのかで対応が違う
2019/11/10(日) 21:23:59.68
Microsoftにログインできなくなってしまった
なぜ…
なぜ…
475名無しさん＠そうだ選挙にいこう
2019/11/11(月) 12:13:38.57 VBAに過度な期待してる人いるな
細かな制御が出来るだけで
なんでもありじゃないんだが
Excelのシステム的に無理なのは無理
細かな制御が出来るだけで
なんでもありじゃないんだが
Excelのシステム的に無理なのは無理
2019/11/11(月) 19:49:36.54
そもそもどういうものか知らないんだろうな
2019/11/11(月) 19:55:27.16
>Excelのシステム的に
なんか変
なんか変
2019/11/12(火) 18:41:15.94
>>267です
また質問をお願いします
【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel 2013
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 出来る限り無しでお願いします
【質問内容】
15列ほどの表をオートフィルタの機能を使って活用してるのですが
そのうち５列ばかりカスタム((上)S+、S、S-、A+、A、A-、B+、B、B-、…、D+、D、D-(下))な順序でソートをします
>>267さんに教えてもらった通りユーザ設定リストを登録して出来るようになりました
そこでこのカスタムソートを１クリック(なるべく素早く簡単に)で実行できる手段はないでしょうか？
普段隠れているボタンとか探してみたのですが自分では見つけられませんでした
また質問をお願いします
【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel 2013
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 出来る限り無しでお願いします
【質問内容】
15列ほどの表をオートフィルタの機能を使って活用してるのですが
そのうち５列ばかりカスタム((上)S+、S、S-、A+、A、A-、B+、B、B-、…、D+、D、D-(下))な順序でソートをします
>>267さんに教えてもらった通りユーザ設定リストを登録して出来るようになりました
そこでこのカスタムソートを１クリック(なるべく素早く簡単に)で実行できる手段はないでしょうか？
普段隠れているボタンとか探してみたのですが自分では見つけられませんでした
2019/11/12(火) 19:56:53.09
>>478
ない
ない
2019/11/12(火) 19:59:43.22
2019/11/12(火) 21:43:48.60
【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
Rangeのセル範囲の中で最も右側のセルを取得するにあたって、スマートな方法を教えて下さい。
※End(xlToRight)を使うと、1セルのときにうまくいかないです。
例1
A B C D
1 ■■■■
Range：A1:D1
→セルD1が取得される
例2
A B C D
1 ■□□□
Range：A1
→セルA1が取得される
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
Rangeのセル範囲の中で最も右側のセルを取得するにあたって、スマートな方法を教えて下さい。
※End(xlToRight)を使うと、1セルのときにうまくいかないです。
例1
A B C D
1 ■■■■
Range：A1:D1
→セルD1が取得される
例2
A B C D
1 ■□□□
Range：A1
→セルA1が取得される
2019/11/12(火) 21:50:56.37
>>481
End(xlToLeft)
End(xlToLeft)
483481
2019/11/12(火) 22:15:46.792019/11/12(火) 22:25:22.40
>>483
質問の意味がわからない
質問の意味がわからない
2019/11/12(火) 22:34:38.67
▼━質問テンプレ (出来れば使ってね) ━━━
【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
ALL_MAPというブックがあって、MAP01を開いてALL_MAPにコピペしてMAP01を閉じる。
MAP02を開いてALL_MAPにコピペと繰り返すマクロを作ったのですが、RangeをALL_MAP
の別シートにあるセルの値を変数にする方法をご教授いただきたく。
Workbooks.Open Filename:="C:\Users\XXXXXX\Documents\MAP01.xlsm"
Range("A1:S12").Select
Selection.Copy
Windows("ALL_MAP.xlsm").Activate
Range("A1").Select
ActiveSheet.Paste
Windows("MAP01.xlsm").Activate
ActiveWindow.Close
コピペするセルには値や数式はありません。オブジェクトだけです。CADの方がいいのですが、
fusion360などは一切ダメなのです。MAPファイルとALL_MAPのRangeは同じです。
よろしくお願いいたします。Excelは表計算ソフトであってドローイングソフトじゃないのですが。
【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
ALL_MAPというブックがあって、MAP01を開いてALL_MAPにコピペしてMAP01を閉じる。
MAP02を開いてALL_MAPにコピペと繰り返すマクロを作ったのですが、RangeをALL_MAP
の別シートにあるセルの値を変数にする方法をご教授いただきたく。
Workbooks.Open Filename:="C:\Users\XXXXXX\Documents\MAP01.xlsm"
Range("A1:S12").Select
Selection.Copy
Windows("ALL_MAP.xlsm").Activate
Range("A1").Select
ActiveSheet.Paste
Windows("MAP01.xlsm").Activate
ActiveWindow.Close
コピペするセルには値や数式はありません。オブジェクトだけです。CADの方がいいのですが、
fusion360などは一切ダメなのです。MAPファイルとALL_MAPのRangeは同じです。
よろしくお願いいたします。Excelは表計算ソフトであってドローイングソフトじゃないのですが。
2019/11/12(火) 22:53:31.89
>>485
自分の脳内設定が他人にも見えてる前提で語るのはやめよう
あまり理解していない単語で説明しようとするのも相手に混乱を招くのでやめよう
とりあえず主旨と思われる、
>RangeをALL_MAPの別シートにあるセルの値を変数にする
はそのコードのどの行でどういう動きをさせようとしてんの
自分の脳内設定が他人にも見えてる前提で語るのはやめよう
あまり理解していない単語で説明しようとするのも相手に混乱を招くのでやめよう
とりあえず主旨と思われる、
>RangeをALL_MAPの別シートにあるセルの値を変数にする
はそのコードのどの行でどういう動きをさせようとしてんの
487名無しさん＠そうだ選挙にいこう
2019/11/13(水) 09:33:34.99 >>485
不明な点
なんで環境変数USERNAME使わないの？
不満言ってるって事は職場で仕方なくだろ
他人に引き継ぐとか考えないん？
別シートにあるセル参照したいならシート名添えるだけだろ？あるいは名前定義
そもそもMAPが画像ならその画像ファイルを貼り付けるればええやん？
わざわざマクロ付きエクセルデータファイルを弄る理由がわからない
不明な点
なんで環境変数USERNAME使わないの？
不満言ってるって事は職場で仕方なくだろ
他人に引き継ぐとか考えないん？
別シートにあるセル参照したいならシート名添えるだけだろ？あるいは名前定義
そもそもMAPが画像ならその画像ファイルを貼り付けるればええやん？
わざわざマクロ付きエクセルデータファイルを弄る理由がわからない
2019/11/13(水) 16:37:59.86
EXCEL今まで工事やりたい時とか物品購入してもらうために稟議書作ったり
テナントに○○日工事やるからヨロシク〜っみたいなお知らせしか作ったことなく
来月から現場じゃなく本社に行かされEXCELやるような事務方の仕事なりそうなんです
けど、本当素人からEXCELやるのにオススメのサイトとか参考書ってあるでしょうか？
自宅にはofficeないのでLibreOfficeで少しでも今から練習しようと思ってまして…。
テナントに○○日工事やるからヨロシク〜っみたいなお知らせしか作ったことなく
来月から現場じゃなく本社に行かされEXCELやるような事務方の仕事なりそうなんです
けど、本当素人からEXCELやるのにオススメのサイトとか参考書ってあるでしょうか？
自宅にはofficeないのでLibreOfficeで少しでも今から練習しようと思ってまして…。
2019/11/13(水) 16:49:44.08
>>488
https://www.becoolusers.com/excel/lesson-basic01.html
1ヶ月使える体験版で練習すればいいよ
それに、仕事に必要な知識は会社で教えてくれるのが普通
あと、Officeのバージョンが違うと画面構成があちこち変わるんで、そればかりはどうしようもない
https://www.becoolusers.com/excel/lesson-basic01.html
1ヶ月使える体験版で練習すればいいよ
それに、仕事に必要な知識は会社で教えてくれるのが普通
あと、Officeのバージョンが違うと画面構成があちこち変わるんで、そればかりはどうしようもない
2019/11/13(水) 19:17:27.41
>>483
最終列番号 = 1
On Error Resume Next
最終列番号 = WorksheetFunction.Match(Null, Me.Rows(行番号), -1)
On Error Goto 0
MsgBox Me.Cells(行番号, 最終列番号).Value
最終列番号 = 1
On Error Resume Next
最終列番号 = WorksheetFunction.Match(Null, Me.Rows(行番号), -1)
On Error Goto 0
MsgBox Me.Cells(行番号, 最終列番号).Value
2019/11/13(水) 19:20:35.80
↑ごめん、範囲じゃダメか。
2019/11/13(水) 19:55:59.96
>>488
Libreは互換性はあるが多少勝手が違うからExcel知らないなら混乱の元だと思う
Libreは互換性はあるが多少勝手が違うからExcel知らないなら混乱の元だと思う
2019/11/13(水) 20:14:06.04
>自宅にはofficeないので
投資だと思って買っちゃうとか・・。
投資だと思って買っちゃうとか・・。
2019/11/13(水) 20:22:54.72
>>489>>492>>493
なるへそ、フリーのだと全くの初心者は厳しいそうなんで1ヶ月無料のでやった方が
良さそうですね…。
https://www.becoolusers.com/excel/index.html
今の所毎日↑のサイトとLIBREで仕事終わった後四則演算とかグラフ作ったり何となく
やってるんですけど1ヶ月フリーOffice入れるとしてどんな本とかサイトでやってけば
少しは役に立ちそうでしょうか？
なるへそ、フリーのだと全くの初心者は厳しいそうなんで1ヶ月無料のでやった方が
良さそうですね…。
https://www.becoolusers.com/excel/index.html
今の所毎日↑のサイトとLIBREで仕事終わった後四則演算とかグラフ作ったり何となく
やってるんですけど1ヶ月フリーOffice入れるとしてどんな本とかサイトでやってけば
少しは役に立ちそうでしょうか？
2019/11/13(水) 20:30:58.26
実務で覚えるのが一番速くて手っ取り早いが
496名無しさん＠そうだ選挙にいこう
2019/11/13(水) 22:18:37.52 ショートカットをマスターするのもいいかもな
車で例えるのなら道はさっぱりわからんけど運転技術は高いみたいな
車で例えるのなら道はさっぱりわからんけど運転技術は高いみたいな
2019/11/13(水) 22:37:26.65
そんなもん基本がわかってからでいい
2019/11/14(木) 10:34:22.07
2019/11/14(木) 12:21:07.68
>>498
とりあえず詳しくないことを伝えるのが先では…
とりあえず詳しくないことを伝えるのが先では…
2019/11/14(木) 21:15:03.08
SUMが使えて、罫線が引けて、色を染められて、印刷が出来れば大丈夫だと思うよ。
周り全員がプログラマーとか、極端な状況でもない限り。
周り全員がプログラマーとか、極端な状況でもない限り。
2019/11/14(木) 21:46:13.00
2019/11/14(木) 21:49:34.57
EXACTは地味に使うわ
2019/11/14(木) 22:17:17.72
2019/11/14(木) 23:12:09.22
>>503
sumproduct関数解ってなさそう
sumproduct関数解ってなさそう
2019/11/14(木) 23:16:48.45
sumproduct重たくなるから極力使わない
2019/11/14(木) 23:22:56.71
サムプロダクトって、式を1セルにまとめられるってだけでしょう?
2019/11/14(木) 23:23:26.62
間違えた。
サム・プロダクトね。
サム・プロダクトね。
2019/11/14(木) 23:55:42.99
テーブルとINDEX(MATCH(),MATCH())
2019/11/14(木) 23:57:25.07
{INDEX(MATCH(A&B),MATCH())}
とかも。
とかも。
2019/11/15(金) 00:46:40.01
中途半端な知識のやつほど無駄にややこしい式を作りたがる
2019/11/15(金) 02:56:53.52
列番号入れるより、よっぽど楽だわね。
2019/11/15(金) 06:26:42.85
513名無しさん＠そうだ選挙にいこう
2019/11/15(金) 07:20:18.69 SumproductはSumで代用出来るから
Sum関数を極める方が良い
Sum関数を極める方が良い
2019/11/15(金) 07:46:45.33
515名無しさん＠そうだ選挙にいこう
2019/11/15(金) 12:20:02.44 配列数式って操作が難しいけど
それに名前つけてしまえば
Sumproduct使わないでもいける
初心者も迷わない かも
それに名前つけてしまえば
Sumproduct使わないでもいける
初心者も迷わない かも
516名無しさん＠そうだ選挙にいこう
2019/11/15(金) 13:17:14.79 ゼロで始まる数字を入れるとそのゼロが消えて困っておる。
だれか対策方法がわかる者はいないのか？
この馬鹿モンが！
だれか対策方法がわかる者はいないのか？
この馬鹿モンが！
2019/11/15(金) 13:59:21.90
>>516
Excelのセルの表示形式がデフォルトの「標準」だと、
少数以外で、頭が0で始まる数字列は、数字ではないと認識するから。
頭 0 を表示させたいなら、
1. 入力するとき、頭に ' を入れて文字列認識させる
2. セルの表示形式を文字列にする
3. セルの表示形式をユーザー定義で、0000 (4桁の場合)とする
3.の場合は、表示は 0123 でも文字認識ではなく、
整数の 123 としてそのまま計算が可能だよ、
Excelの、というかスプレッドシートの基本中の
基本も知らない、調べようともしないトンマさん。
Excelのセルの表示形式がデフォルトの「標準」だと、
少数以外で、頭が0で始まる数字列は、数字ではないと認識するから。
頭 0 を表示させたいなら、
1. 入力するとき、頭に ' を入れて文字列認識させる
2. セルの表示形式を文字列にする
3. セルの表示形式をユーザー定義で、0000 (4桁の場合)とする
3.の場合は、表示は 0123 でも文字認識ではなく、
整数の 123 としてそのまま計算が可能だよ、
Excelの、というかスプレッドシートの基本中の
基本も知らない、調べようともしないトンマさん。
2019/11/15(金) 14:39:16.88
デフォルトの設定通りテキストアラインは、文字列は左寄せ、数値は右寄せが基本的には見栄えがいいのに誰も彼もどこもかしこもが真ん中寄せ大好きなのって何か理由があるのかね？
519名無しさん＠そうだ選挙にいこう
2019/11/15(金) 17:47:05.30520名無しさん＠そうだ選挙にいこう
2019/11/15(金) 17:48:20.09 ただのう、エクセルのインデントはおおまか過ぎるとは思う
もっと細かく指定したい
もっと細かく指定したい
2019/11/15(金) 18:32:27.08
2019/11/15(金) 20:56:03.89
0を消す機能はあっても良いけど、消えるのがデフォってのが面倒臭いんだよな。
このせいで、001とか入っているCSVを編集・保存する時は、
いちいちテキスト取り込み機能使うか、メモ帳で編集しなきゃならん。
このせいで、001とか入っているCSVを編集・保存する時は、
いちいちテキスト取り込み機能使うか、メモ帳で編集しなきゃならん。
2019/11/15(金) 21:03:23.69
3/4 → 3月4日 勝手に日付にすんなボケ! とか
2019/11/15(金) 21:14:56.69
勝手に表示形式変えるのはほんとウザい
2019/11/15(金) 21:30:35.27
国産じゃないからな。
日本人の考える親切とはズレてるんじゃないだろうか。
日本人の考える親切とはズレてるんじゃないだろうか。
2019/11/15(金) 22:55:31.24
527名無しさん＠そうだ選挙にいこう
2019/11/15(金) 23:00:41.69 ▼━質問テンプレ (出来れば使ってね) ━━━
【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 無理
よろしくお願いします。A1:B20に入力済みの検索キー（10進法)。
A列は上限値、B列は下限値、AnとBnで一対です。
E1:F1000のE列に検索をかけ、検索キーごとに該当する複数行のEn*Fnの和を求めたい。
E列は整数のみ、F列は整数と小数10^-8の混合記載です。
【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 無理
よろしくお願いします。A1:B20に入力済みの検索キー（10進法)。
A列は上限値、B列は下限値、AnとBnで一対です。
E1:F1000のE列に検索をかけ、検索キーごとに該当する複数行のEn*Fnの和を求めたい。
E列は整数のみ、F列は整数と小数10^-8の混合記載です。
2019/11/16(土) 00:20:30.12
>>527
検索キーとか言っといて範囲なのか…
=SUMPRODUCT(($E$1:$E$1000>=A1)*($E$1:$E$1000<=B1),$E$1:$E$1000*$F$1:$F$1000)
検索キーとか言っといて範囲なのか…
=SUMPRODUCT(($E$1:$E$1000>=A1)*($E$1:$E$1000<=B1),$E$1:$E$1000*$F$1:$F$1000)
2019/11/16(土) 00:21:59.26
AとBの不等号逆だったわ
2019/11/16(土) 02:25:31.68
>>519
1.何でもかんでも真ん中寄せ
2.セル結合大好き
3.表というものは縦横の罫線で囲まれているもののことをいう
4.そうだ！間に空白行を挟めば綺麗で見易い表の出来上がり！
奇数番はともかく、そこから更に分析が必要な資料に偶数番を施されて殺意を覚える方が現状では少数派なんだろうな
1.何でもかんでも真ん中寄せ
2.セル結合大好き
3.表というものは縦横の罫線で囲まれているもののことをいう
4.そうだ！間に空白行を挟めば綺麗で見易い表の出来上がり！
奇数番はともかく、そこから更に分析が必要な資料に偶数番を施されて殺意を覚える方が現状では少数派なんだろうな
2019/11/16(土) 02:30:36.18
見てくればかりに時間使ってるのは、
日本の生産性が上がらない原因の一つ。
そんなことより、
ピボットテーブルだのPower Query覚えたら？
日本の生産性が上がらない原因の一つ。
そんなことより、
ピボットテーブルだのPower Query覚えたら？
2019/11/16(土) 09:17:36.48
5.項目が被ってるものはいちいち書くより空欄にした方が見易いよね
6.そうだ！業者別に表を別々に作ろう！縦に列べるより横に並べた方が綺麗だな
7.日付はドットで区切るに限る(ｷﾘｯ！)
8.何だここ？=ぶいるっくあっぷ何とかかんとかのファルセ？まあ、いいや！取り敢えずこのセルには100と入力と♪
もう全部自分でやるからあなた何もしなくていいよ
という思いを全く抱かないのは懐が深いか甘いか鈍いかのどれかだな
6.そうだ！業者別に表を別々に作ろう！縦に列べるより横に並べた方が綺麗だな
7.日付はドットで区切るに限る(ｷﾘｯ！)
8.何だここ？=ぶいるっくあっぷ何とかかんとかのファルセ？まあ、いいや！取り敢えずこのセルには100と入力と♪
もう全部自分でやるからあなた何もしなくていいよ
という思いを全く抱かないのは懐が深いか甘いか鈍いかのどれかだな
2019/11/16(土) 09:43:13.38
液晶の解像度がHDからFHDに変わった人結構いますよね？
以前より若干文字が太字に変わってしまったと思うんですけどそのまま使ってますか？
慣れるしかないのかな。
以前より若干文字が太字に変わってしまったと思うんですけどそのまま使ってますか？
慣れるしかないのかな。
534名無しさん＠そうだ選挙にいこう
2019/11/16(土) 11:00:12.35535名無しさん＠そうだ選挙にいこう
2019/11/16(土) 11:01:32.17 それもこれもエクセルにレポートの機能ないから
アクセスのようなレポートでも作れれば
かなりスッキリする
アクセスのようなレポートでも作れれば
かなりスッキリする
536名無しさん＠そうだ選挙にいこう
2019/11/16(土) 11:10:42.04 アクセスの様なレポート作れたら
アクセス辞める人多いと思われ
イラストレーターの差し込み印刷となるデータ駆動グラフィックは
帳票作れんし
アクセス辞める人多いと思われ
イラストレーターの差し込み印刷となるデータ駆動グラフィックは
帳票作れんし
2019/11/16(土) 11:45:56.53
マクロでレポート作成ツールを作らされる
■ このスレッドは過去ログ倉庫に格納されています
ニュース
- 広がる“子どものいない人生” 語り始めた女性たち [おっさん友の会★]
- 【映画】『君たちはどう生きるか』 なぜジブリ史上最大の問題作となったのか？ 過去の宮崎駿作品との決定的な違いとは？考察＆解説 [湛然★]
- 【中高年シングル女性】就職氷河期世代の単身女性に警鐘「低年金で保証人もいない」“おひとりさま”老後のリアルな声 [ぐれ★]
- 宮崎出身芸人、東京のチキン南蛮に不満「8割ニセモノ。揚げた唐揚げの上にタルタルのっけてるだけ。本当のチキン南蛮ではない」 [muffin★]
- 【二股不倫】永野芽郁CM出演で“不買運動”が開始された意外な商品 ポスト綾瀬はるかの呪縛とは [jinjin★]
- フジテレビ、「ハラスメント根絶宣言」を発表 「しない」「させない」「見過ごさない」…全社員に署名を要求 [muffin★]
- 日本人「うわああ！ロシアが『Z』を使ってるうう！『Z』の使用を禁止しろおおお！」これなんだったの？ [931948549]
- ネトウヨ界の姫、AVデビュー [202578698]
- 【画像あり】6児のママ「今夜はトンカツよ〜！」→ [808139444]
- 「たった2人の総理大臣のせいでここまで日本が崩壊するなんて...」10万いいね [485187932]
- 広末涼子「双極性感情障害」公表、活動休止 [564869214]
- 【GW暇な奴来い】安価で指定されたものを全力で探してうpするスレ