Excel総合相談所 141
レス数が1000を超えています。これ以上書き込みはできません。
【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2007
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
A1,E1,I1,M1・・・と横列に4列おきのセルの文字が指定文字と同一だった場合そのセルの3列横D1,H1,L1,P1・・・の和を出したいです。
横4列使ったグループが横に並んでいてグループの最初の列が一致している文字の場合だけグループ最終列の和を求めたい。縦は日付けで伸ばして行きます。
IFでグループ分足せば出来ますが長すぎるので簡単に引き出せないかと思いまして 指定文字の列がグループ終了横に存在し指定文字ごとに和を並べます
例えば2列目のA～AAの中にAB1,AC1と同じ文字があればその同じ文字の列の3行隣りの数値の和をAB2,AC2に表したいです 補足します
2列を1日とした場合にA2から横に4列づつのグループが続いており、グループ終了後に指定文字が1列目に並んでいます。
各指定文字の2列目に和を表示させたいのです。
全グループを横に範囲指定して各グループ最初列を検索対象にして指定文字と一致した場合に一致しているセルの3列横の数値の和を指定文字の1日の列（2列目）にあらわすと言う感じです >>7
検索値一致の横軸飛び列の和を出すのが分かりません この表では無いですがこんな感じでS3に「あ」と一致する「値」の合計を出したい
https://i.imgur.com/gsC19AC.jpg >>9
因みに毎日入力するのは各グループの名前だけで空白もありえます。
率と定数は基本一定なのですが変わる可能性もあります。
グループはNo.40くらい有ります。 簡単にとかいうのは自分でやれって感じだよな
文字数制限で長い関数を断られるレベルならともかく、入るんならそれでいいんだから
困ってもいないのに他人を無料で使って成果だけ得ようとかずうずうしいにもほどがある >>3,9
同じ質問者？
４列でひとつのグループというところ、グループの１列目で一致したら３列横の数値を合計という共通点あり。
>>9の図だとB列からグループが始まってるという違いはありますが。
マクロだめというなら、作業シートを使うのがわかりやすいと思う。
グループが増え（列方向に処理対象が拡大）てもわかりやすいのを考え中です。 >>3
sumifかsumifsで条件範囲と合計範囲ずらせば簡単に出来る
https://i.imgur.com/9qeDhjZ.png
>>11
ifを何個も並べるのはアホらしいし保守性も下がる
ここで遠慮なく聞くべき
たまにいる「sumifsはなんか嫌です」ってのはちょっとなぁと思うけど >>9
真面目にこういう糞みたいな表作る奴って頭どうなってんの？ >>9
ナンバー列を作って全部縦に並べてから質問してきてくれ >>15
本人にとって認知負荷が低い表なのだろう
慣れ親しんだデータ形式がこの形
他人のデータが欲しい場合、提出が遅くなるぐらいならさっさとそのままのデータ出してくれた方がよほどありがたい >>15
>>16
グループの列までは他で使われてる配列なので変更出来ません
排出する和を表示しるのを私が追加したいだけです >>14
ヒント頂きました
ずらすと言う考え方をOFFSETを利用して計算出来ました
S3に
=SUMIF（$B$2:$Q$2,$S$2,OFFSET（$B$2:$Q$2,0,3）） まずグループで和を出す。必要なチャンクで。
そのあと、sumifで再度和を集計すれば良い。 >>21
行は日付なんで毎日のグループの中で同一ネーム事の和を出して表示させます。
グループが多くて名前が毎日入力されて行くので和を集計したいと
>>19で出来ましたので皆さまありがとうございます ご教授宜しくお願い致します。
シリアル値が入力されている日付で
表示形式は m/d(aaaa) なのですが
翌月のd が重複したときにIf文か条件書式にて非表示にしたいです。
4/15～4/14 のような形
現在の自身の環境だと、どうしても月によって15日が表示されてしまいます。
回答お待ちしております。 よろしくお願いいたします。
あるセルの値のなかに ? という文字（チェックボックスにチェックが入っている文字）が
使われているかどうかをVBAで判定したいのですが、
どのように書けばよいのでしょうか？
?そのものを条件式に書いても、VBAエディタの段階ですでに文字化けしてます。 >>23
ちょっと何いってるのかぜんぜんわかんない
こうしたいのに、こうなるってのを示してほしい
あとm/d～m/dはひとつのセルで表示させるの？ =COUNTIF(A1:A10,NOT(B1))
これが動作しないんですが、どうすればいいですか？ >>31
いえ、式を変えたいのではなく、=COUNTIF(A1:A10,NOT(B1)) を動作させたいんです NOT(B1)の戻り値は、B1が0かFALSEならTRUE , 0以外の数値ならFALSE , 文字列なら #VALUE , 他は省略
TRUE , FALSE を数値に変換すると、 1 , 0
これがCOUNTIFの条件になるだけだから、おそらく動作はしてるぞ
例えば、B1に A A2に=INT("A") とでもすれば、A2はカウントされる
希望する動作にならないだけ Workbooks.Open ThisWorkbook.Path & "\hogehoge.xlsm"
で同ディレクトリのブックを開くときに、同時に
ActiveSheet.Unprotect Password する方法教えてください。 Workbooks.Open ThisWorkbook.Path & "\hogehoge.xlsm",Password:="hogehoge"
自己解決しました 【1 OSの種類 .】 Windows8.1
【2 Excelのバージョン 】 Excel2003
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
EXCELファイルをデスクトップにコピーしたと思ったら、マンインザミラーだったら目が点になるわ! ＿＿＿＿＿＿＿＿＿＿＿
＼1 OSの種類 ＼
＼2 Excelのバージョン. ＼＿＿／￣￣＼_
／3 VBAが使えるか .／ ＼＿|￣＼|
／4 VBAでの回答の可否 ／
￣￣￣￣￣￣￣￣￣￣￣
新しいテンプレのデザインを考えてみたんだが、
6行も使ってしまい実用的ではないし、
内容を書くスペースもない 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 可
マクロ初心者です。
このような形で氏名のは入っている行に新規登録を追加していきたいと考えております。
ここまでは表示することができましたが、.Range("4:4")の次の値をSetする際にどうしてもうまくできません。
ご教授をお願いします。
Sub 検索()
With Worksheets("30年（当月）")
Dim noRng As Range
Dim nameRng As Range
Dim namelRng As Range
Set noRng = .Range("4:4").Find(what:=.Range("番号").Value, lookat:=xlWhole)
Set nameRng = .Range("4:4").Find(what:=.Range("氏名").Value, lookat:=xlWhole)
Set namelRng = Range("i15").End(xlDown)
Cells(namelRng.Row + 1, nameRng.Column) = "新規氏名"
Cells(namelRng.Row + 1, noRng.Column) = "新規番号"
End With
End Sub ここまでは思うように動かすことができました。
Sub 検索()
With Worksheets("30年（当月）")
Dim noRng As Range
Dim nameRng As Range
Dim namelRng As Range
Set nameRng = .Range("4:4").Find(what:=.Range("氏名").Value, lookat:=xlWhole)
Set namelRng = Range("i15").End(xlDown)
Cells(namelRng.Row + 1, nameRng.Column) = "新規氏名"
End With
End Sub >>39
=.Range("番号")
は恐らく
:=.Range(番号)
その下の
"氏名"
も
氏名
のような気がする
これで動かないならコード全体を見ないと難しい >>41
39です。
ダメでした。
書いたコードは39がすべてです。 >>42
後半の方のCellsとかRangeに.が付いてないのは原因としてあるかもしれない
それと、エラーの内容を書いてくれ
恐らくSetしたnoRngがNothingだからかと思うが >>42
まさか、こういうこと？
誤 Set namelRng = Range("i15").End(xlDown)
正 Set namelRng = .Range("i15").End(xlDown) >>43
実行時エラー’1004’
アプリケーション定義またはオブジェクト定義のエラーです。
この行に問題があるようで、ここから先に進めません。
Set noRng = .Range("4:4").Find(what:=.Range("番号").Value, lookat:=xlWhole) .Range("番号").
は、どこかのセルr範囲に「番号」という名前が付けられていないとエラーになるぞ
https://i.imgur.com/qoS31Ub_d.webp?maxwidth=728&;fidelity=grand >>46
名前は付けてないですが、このような形でデータ入力しています。
＞＞40についてはうまく入力できるのですが・・・。
https://imgur.com/iANDte4 エラーで中断したときにイミディエイトウインドウで
? .range("番号").valueを実行して検索する番号が表示されるか試してみて セルの名前じゃなくて内容で何列目か検索したいってことか？だとしたら
正 What:="名前"
誤 What:=Range("名前").Value とりあえず>>47のスクショで何がやりたいのかなんとなくわかってきたわ
色々と突っ込みたい所はあるけど、とりあえず元のコードをできるだけ直さない形で動くようにした
ただし、本来は名簿のデータがある程度入ってないと動かないコードなんで、一箇所だ行番号を修正した
Sub 検索()
Dim noRng As Range
Dim nameRng As Range
Dim namelRng As Range
With Worksheets("30年（当月）")
Set noRng = .Range("4:4").Find(what:="番号", lookat:=xlWhole)
Set nameRng = .Range("4:4").Find(what:="氏名", lookat:=xlWhole)
Set namelRng = .Range("i9999").End(xlUp) '★この行は動かすためにアレンジ
Cells(namelRng.Row + 1, noRng.Column) = "新規番号"
Cells(namelRng.Row + 1, nameRng.Column) = "新規氏名"
End With
End Sub で、名前の列を検索したのにその結果を使わないのはおかしいので、新規を追加する行を検索する部分も修正
Sub 検索()
Dim noRng As Range
Dim nameRng As Range
Dim namelRng As Range
With Worksheets("30年（当月）")
Set noRng = .Range("4:4").Find(what:="番号", lookat:=xlWhole)
Set nameRng = .Range("4:4").Find(what:="氏名", lookat:=xlWhole)
Set namelRng = .Cells(9999, nameRng.Column).End(xlUp)
Cells(namelRng.Row + 1, noRng.Column) = "新規番号"
Cells(namelRng.Row + 1, nameRng.Column) = "新規氏名"
End With
End Sub ごめん、Withの存在を忘れてたんで訂正
Sub 検索()
Dim noRng As Range
Dim nameRng As Range
Dim namelRng As Range
With Worksheets("30年（当月）")
Set noRng = .Range("4:4").Find(what:="番号", lookat:=xlWhole)
Set nameRng = .Range("4:4").Find(what:="氏名", lookat:=xlWhole)
Set namelRng = .Cells(9999, nameRng.Column).End(xlUp)
.Cells(namelRng.Row + 1, noRng.Column) = "新規番号"
.Cells(namelRng.Row + 1, nameRng.Column) = "新規氏名"
End With
End Sub 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel for Microsoft 365 MSO(16.0.13231.20348)64bit
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
仕事で2台のデスクトップPCを使用しています、1台を新しく買い替えたためofficeをダウンロードしてインストールしました。
新PCのエクセルで結合セルを含むソート(並べ変え)ができなくなって困っています
A1～G30の範囲で各行のE列とF列が結合されています
この状態でソートをかけると「この操作を行うには、すべての結合セルを同じサイズにする必要があります。」とエラーになります
古いPCのエクセル（ Excel for Microsoft 365 MSO(16.0.12527.21096)64bit）では問題なくソート(並べ変え)はできます。
これはパソコンが原因なのか、エクセルが原因なのか、分かる方がいらっしゃれば教えてください
また、office365で前のバージョンをインストールする方法があれば、教えていただきたいです
よろしくお願いします。 >>53
だから何で馬鹿はすぐセル結合するのかね？ >>53
エクセルのダウングレードを考えるより、vbaの回答が可なら結合解除して並び替え後に再結合するマクロを作ったらいいんじゃね 特定のセルをクリップボードにコピーするマクロってどう書く？ まだ結合結合言ってるのか
結合する奴は結合の意味わかってて結合するのかね？ >>57
Sub Sample1() 'セルA1の内容をクリップボードに入れる
With CreateObject("Forms.TextBox.1")
.Text = Cells(1, 1)
.SelStart = 0
.SelLength = .TextLength
.Copy
End With
End Sub >>53
エクセルが原因です
並べ替えをするならセル結合はやめたほうが良い
セル結合は、送付状みたいに完全に文書としてエクセルを使う時だけにしたほうが良い
>>54
馬鹿じゃなくて初心者。誰だって初心者の頃はあるんだから、そう見下さない方が良いよ >>49
ありがとうございます。
解決できました。 >>52
ありがとうございました。
これで新規追加の運用の目途がたちました。 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 可
A1:B5に数字が入ってたり入っていない表があり、
「最低値がA列にあるかB列にあるか」を判定する式として、
=IF(MIN(A1:B5)=MIN(A1:A5),"A列に最小があるよ","B列に最小があるよ")
という式を作りました。
(最小値がA列とB列両方にある時は"A列に最小があるよ"でとりあえず構いません)
しかし、
「A列に数字が一つも入っていない」かつ「B列の最小値が0である」時、
「Aにはデータが入っていないが、数値的には0である」という判定になっているのか、
「A列に最小があるよ」という間違った(?)判定がでてしまいます。
この「A列にデータが入っていないときに数値的に0である」ことを避けることは可能でしょうか。 =IF(COUNTIF(A1:A5,MIN(A1:B5))>0,"A","B") 回答ありがとうございます。
>>66さんで「countで数えたら分岐できるのかー」と思い
=IF(COUNT(A1:A5)=0,"(A列にはデータ入ってなくて)B列に最小があるよ",IF(MIN(A1:B5)=MIN(A1:A5),"A列に最小があるよ","B列に最小があるよ"))
と、なんとかできたぞウヘヘと思っていたのですが、
>>68さんにキレイにまとめて頂いて感謝しております。
ありがとうございました。
こういう関数をキレイにまとめるセンスっていうのは
積み重ねなんでしょうか
努力します。 前任者が作ったファイルが、どういう仕組みなのかわからないことがあります。
教えてください。
あるセル（2つのセルをくっつけたもの）なんですが、見た目には「一戸建て 賃貸 寮 実家 未定」とあり、
それぞれにチェックボックスみたいなものがあります。
ユーザーは、チェックボックスにチェックを入れるか外すという操作しかできません（文字列を編集することも
チェックボックス自体を選択することも不可能）
そして、そのセルを選択した状態でも、上にある数式バーには何も表示されていないんです。
シートに保護はかかっていません。
そのセルの書式設定を見ても、表示形式＝標準、保護＝ロックのみチェック、表示しないはチェックなし
という状態です。
これ、どうやって作成したのでしょうか？考えられる方法ありますでしょうか？
選択項目を追加したり、あるいは、VBAで何が選択されているのか取得したりすることはどうやれば可能なんでしょうか？ どうやって作成したのでしょうか？VBAと連動できますか？ >>75
>>選択項目を追加したり、あるいは、VBAで何が選択されているのか取得したりすることはどうやれば可能なんでしょうか？
はっきりと書いてあるみたいだけど
それがわからない文盲なら
回答側に回ろうとしないほうがええで 作成方法を知りたいのか取得の仕方を知りたいのか、どっちなんですかね？ >>71です。
みなさま、ありがとうございました！
なんとかなりそうです！！ >>59
ありがとうございました。
追加で質問させていただきますが、
クリップボードにコピーしたものをテキスト形式で貼り付けるVBAってどう書くのですか？
例えば、エクセルをセルごとコピーして、他のセルに貼り付けるとき、フォントや罫線まで
コピーせずに貼り付けるVBAです んなもんマクロの記録で実際に操作してみて記録されたもの見ればすぐわかるだろ >>81
Sub Macro1()
'A1をB1に値貼り付け
Cells(1, 1).Copy
Cells(1, 2).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
'webサイトをコピーして「貼り付け先の書式に合わせる」で貼り付ける場合
ActiveSheet.PasteSpecial Format:="HTML", Link:=False, DisplayAsIcon:= _
False, NoHTMLFormatting:=True
End Sub
>>82の通りマクロの記録でこのアタりは記録できる >>83
ありがとうございます！
が、警告が出るのですが、、、
>>82
答えを知らないくせにイチャモンつけるクズw >>84
こうかねー
まぁマクロの記録した後、テキトーに編集するだけでいいよ
Sub Macro1()
'A1をB1に値貼り付け
Cells(1, 1).Copy
Cells(1, 2).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
Sub Macro2()
'webサイトをコピーした後、以下を実行すると「貼り付け先の書式に合わせる」で貼り付けることができる
ActiveSheet.PasteSpecial Format:="HTML", Link:=False, DisplayAsIcon:= _
False, NoHTMLFormatting:=True
End Sub >>84
まだまだありがとうございます！
が、やっぱり警告が出ます。win32の警告です、、、 何でもいちいち人の指示仰いで自分で考えて行動しないとかお子ちゃまかよ >>86
俺の方には出ない
何の警告か知らんけど全文書き込むかスクリーンショットでも貼ってくれ >>91
スクショはちょっと、、、
警告を無視しても動かないのですか？
>>92
おまえのちっぽけで安い物差しで、
他人の行動に四の五の言うな。 office365を使っています
Excelからsharepointのリストを編集したいです
具体的にはリストの全アイテムを削除したのち、Excelのテーブル全レコードを登録したいのです
どのようなやり方がありますか？ >>94
>>95
クズはクズのムジナから出てくるな。 Excelの初歩的なことができないだけじゃなくて日本語もできないのかよ おまえのちっぽけで安い物差しで、
他人の行動に四の五の言うな。 >>85のを試してみたけど警告もエラーもなく正常に動くな
原因は別にあるんだろう
（Windows 10 v2004 64bit, Office 2003 SP3） >>93
家のPCは警告自体出ない。office365。設定は色々変更済み
会社でやってみたら最初の一回目はなんかのエラーでてスルーしたけど2回目から出ずに普通に動いた。
こっちもoffice365で変更はほとんどしていない
まぁなんだ
スクショないと全然分からん >>109
そうじゃないんだ
この手のは「俺も試したがエラーが出ない。環境はxx」「エラーは出たがオプションのｘｘ」
などとみんなが回答することで解決するんだ
程度を問わず、しっかりと真摯に相手の質問に答える事で、荒らしは防げるんだ 底辺だなあ。例えも完全におかしいし。
頭悪いってキミ言われない？w
まあキミは馬鹿のままでいいよ。俺がうまく使ってやるからさw >>110
一番肝心な質問者が
スクショは貼らん全文は書かんって姿勢なので
無駄なレスでスレ消費しようとせんでくれんかね ウンコにシメジとかとうもろこし混じってるよね
お前らそれ 丸呑みしないで奥歯でよく噛め
そうすりゃしめじもコーンもヒジキも消化されるのでうんこに混じることもなくうんことして出てくるから なんでお前らそんなにExcel詳しいの？どうやって学んだの？ テーブルのスライサーの項目選択を変更したときに、VBAで該当のスライサーの名前を取得する
シンプルな方法があれば教えてください。
現状スライサーは4つ使用して、worksheetのcalculationイベントでVBAを動作させています。値変更時に再計算が無いスライサーが一つあって困っています。 >>117
どうやったら仕事で楽できるかを考え続ける事
実務じゃない勉強を続けたり、一ヶ月や二ヶ月頑張る程度ではちょっと厳しい
毎日ちょっとずつの積み重ねを2,3年も続ければ、それなりに使えるようになる
特に他人用のツールを作る時が本当に難しい。保守性を上げる必要がある フィルターって1シート一箇所と思っていましたが、
複数に設定できるシートがありました
どうやれば設定出来るのでしょうか？ >>125
すいません、そうではなく・・・
フィルタを複数の箇所に設定出来ていたのです >>126
ここまでできた。目的は何？教えて。
Sub foo_value()
Range("A1:A10000").Value = 1
Debug.Print "start"
Debug.Print Now()
For i = 1 To 100
Range("A1:A10000").Value = Range("B1:B10000").Value
Next
Debug.Print "end"
Debug.Print Now()
End Sub
Sub foo_copy()
Range("A1:A10000").Value = 1
Debug.Print "start"
Debug.Print Now()
For i = 1 To 100
Range("A1:A10000").Copy
Range("B1:B10000").PasteSpecial
Next
Debug.Print "end"
Debug.Print Now()
End Sub 同じシート上に複数フィルターかけられるのはテーブル機能使ってるんじゃないかな
テーブルごとにフィルターかけられる >>127
目的は、フィルタを複数設定したいのです
>>128
テーブル機能というんですね、ありがとうございます
オプションで「フィルタを複数使う」というものがあるのかと思い、探していました 【1 OSの種類 .】 Windows 7
【2 Excelのバージョン 】 Excel 2007
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
ユーザー設定の並べ替えで、並べ替えのキーにフォントの色は指定できますが、
フォントの名、スタイル、サイズで並べ替えるようには出来ますか。
Excel 2007を使っていますが、最新バージョンで可能なら早急に買い替えます。 >>131
2007でも出来るが、VBA否じゃ無理。 Excelに銀行のパスワードやIDを保存するのは、どうでしょうか？ 質問させて下さい。
会社からOffice365のブラウザ版のアカウント貰ってるのですが、自宅pcにエクセル入って無い場合は、ブラウザでしかエクセルは使えませんか？ ExcelのVBAって、2013から2019などバージョンが上がると、
一部が使えなくなったりするのですか？ 拡張子ふえた時はちゃんと指定しないとエラーになった時期はあったね 他ブックのセルを参照したセルで参照先ブックがなくなった場合前回の値が残ってるけど
同じ参照先で前回の値が違うブックを2つ開くと先に開いたブックの値が後に開いたブックの値に変わる現象に関する公式情報ってありますかね？
調べ方が悪いのかネットで調べても情報が出て来ない そもそもVBAって長年使いまわすもんでもないでしょ 運用しだいでねーの
短期でしか使わない、なんてほうが思い込みだと思うで 最近、Excelのマクロを使わない企業が増えているのですか？ >>138
本当にごく一部だけだからあまり気にしなくていいよ
大抵エラーが出るだけで、関数や機能が削除されることはほとんどない
なんだかんだでactivexですらまだ使えるし
>>141
多分無い。多分バグ。
それに気づいてる人自体ほとんどいなさそう
ってかそれ以前に参照先ちゃんと作ってあげて
>>144
減っていると思う。
安価なクラウドアプリが増えたからvbaどころかエクセル無しでも色々出来るようになってきた マクロ禁止の会社年3パーセントで増えてるよ
中小は除く
数えても意味ないからね 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
配列が2つあってその二つを内部で結合させたい
こんな感じ配列AとBがあったとして
A B
１ あ
２ い
３ う
Cに結果をこんな感じで入れたい
C
１あ
２い
３う
ループ処理使わないで可能でしょうか？ 効率度外視ならなくはないけど、for～nextなら三行で終わるんだから使わない手はないかと 内部処理に拘らなければ、一度シートに落とすやり方でも3行で終わる ループを使いたくない理由なんて、速度以外には考えられないな。
100万レコード処理するのか? ありがとうございます。
素直にループ処理したほうが良さそうですね。 ありがとうございました。
もう解決したので大丈夫です。 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
エクセル2010から2013に変えたら、微妙に大きいデータファイルの描画がもたつく。
たとえばグラフィックボードを積んでる場合だと、エクセルの描画処理も速くなりますか？ >>165
エクセルの描画はGPUで早くなる
古いPCだったら中古のグラボをとりあえずくっつけて見ると改善される可能性は高いと思う
最近のPCの場合、内蔵GPUが割と良くなってるからあんまり変わらないような気がする >167
グラボなし→安いグラボ追加、は経験上かなり調子が良くなるので割とおすすめなんだ
可能ならサウンドボードも差した方が色々と調子良くなる
多分、CPUに色々と負担が行き過ぎている
ただ、その差した物が調子悪くなると全体の調子が悪くなるという罠もあるので、やりすぎると原因追求がめんどくさくなる
この塩梅がかなり難しいので、中古のグラボで試験してみると良いという提案なんだ
メルカリで買ってメルカリで売る。コストがほとんどかからない。 >>165
なぜ2019に変えないのですか？
変えれば速くなりますよ 質問します､この状況
https://i.imgur.com/eniil64.jpg
で､B-1にC-1の文字から都道府県だけ入れたいのですが
神奈川県みたいな四文字の県もオートフィルで都道府県だけ入れるにはどうしたら良いですか？
C-1の文字はA-1の電話番号から住所を選択して入力した事になってます 別途市外局番と都道府県名のテーブル作ってVorXLOOKUP >>171
=LEFT(C1,IFERROR(FIND("都",C1),IFERROR(FIND("道",C1),IFERROR(FIND("府",C1),IFERROR(FIND("県",C1),0))))) >>171
いろいろやり方あると思うけど、一般的なのはmid関数で4文字目が「県」かどうか判定して、trueなら4文字目までが県名なのでそれを抜き出す。そうでないなら、東京都や北海道なども含めて3文字目までが都道府県名なのでそれを抜き出す。
「県」で始まる市名があるとアウトだけど、たぶん大丈夫。 電話番号から住所抜き取るってことはその参照元になるテーブルがあるんじゃないの？ >>165
描画が何を指しているのか知らんけど、
ファイルを開く動作を指しているなら、xlsとxlsxの違い
xlsxになってからはデータをいちいち圧縮するようになった。 そんな話してねーし、ファイルのデータ要素がそもそも違うから圧縮とか関係ない お世話になります。
1-10行目まで表示形式"35:00"と表示されていて
1-10行目までにどれか1つが"35:01"以上の場合
"NG"と表示したいのですが、どのような記述にすればいいですか？ >>179
=IF(A1:A10">35:00","NG","OK")
ですか？エラーになります。 >>178
表示形式で比較は間違ってる
数式バーに表示される値を使用して式に入れなさい 時が入ってない事で難易度が上がってるね
1/24を2進数で正確に表現できないから、MODで時をとばそうとしても誤差が出て、シリアル値のままでの比較は難しいと思うぞ
分と秒を出した方がいい >183 >>184
この状態で比較条件の"35:00"をセルに指定することって可能ですか？
どちらにせよ分と秒を出す必要がありますか？後出しですみません。 すみません、再質問です。
https://imgur.com/a/e1TD1fN
B4にB7を超える値を含むセルがD4～9にある場合
"NG" 、でなければ"OK"を表示させたいです。
宜しくお願い致します。 =IF(COUNTIF(データ,">",&B7)=0,"OK","NG" >>185
セルに 0:35:00 と入力したうえで、セルの書式を mm:ss にしたら、表示の上では 35:00 になります。 win10
2013
vba使える
vba可
A列に1行目から1,1,2,2,2,2,3,3,3,・・・のように連番で不規則に数字が入っていて、B列にはd,d,g,g,a,a,a,a,b,・・・とアルファベットが不規則に入っているとき
A列の数字の隣のアルファベットを、別のシートに横向きに整理してリスト化したいです。
上の例の場合はこのようにリスト化したいです。
1 d
2 g a
3 a b
どうすればよいでしょうか・・・ グラフの設定(範囲や色など)をマクロもしくは一覧みたいな形で文字で出力する方法はありませんか？ >>191
ごめんExcel365でしか思い浮かばなかった
しかもINDIRECTがスピル出来なかったからE1の式を下にフィルしないといけない
http://imgur.com/qpfKKxx.png セル内の文字を簡単にドラッグできるショートカットありませんか？ >>195
どうやって取得すればいいか教えてください
どうしたらいいか全く思いつきません >>198
いろいろやってみたけど､結局マウスでドラッグするのが最も簡素だとわかりました 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Office365版 Excel
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 否
横方向の範囲を指定したSUM, CONCAT, MIN/MAX, COUNTIF などを下方向にスピルとすると、
書き方が悪いのか、スピル範囲全体の範囲指定になってしまいます。
横方向（1行3列など）をスピルで計算したいです。
A1: 1 B1:2 C1:3 D1:=SUM(A1:C1)
これを下10行目までスピルにしようと =SUM(A1#:C1#) と記述すると
D列にはその行のA～C列の合計がスピルで表示されるのではなく、
D1にSUM(A1:C10)に当たるものが1つ表示されておしまいです。
https://imgur.com/GnTtrtd
最悪SUMなら A1#+B1#+C1# CONCATなら A1#&B1#&C1# などと避けてきましたが、
今MIN（しかも MIN(A1:C1)ではなくMIN(A1,C1,E1)タイプ）でしんでしまいました。
お助けください。 月の前半後半の集計期間を関数で自動で表示したいと考えています
例えば、A1セルに10月1日から10月15日のいずれかの日付が入力されたらC1セルに「集計期間：10月1日〜10月15日」
A1セルに10月16日から10月31日の日付が入力されたらC1セルに「集計期間：10月16日〜10月31日（末日を表示）」というふうにしたいです
できれば1セル内で収めたいです。よろしくお願いします 一部文字化けしました
10月1日から10月15日
10月16日から10月31日
失礼致しました >>203
IF
A1のDAYが15以下or16以上で切り分け
集計期間 A1のMONTH A1のDAYの切り分けに応じた開始日 A1のDAYの切り分けに応じた終了日
その月の末尾の日付はぐぐって >>203
素直にピボットテーブル使った方がよいと思います >>202
SUMはスピル対応してないよ
スピルするなら
=A8:A12+B8:B12+C8:C12
と書かないとダメ ピボットで本当に出来ますか？
そうとは思えないのですが、、、 >>208
できそうもないこと考える時間ももったいないから>>205でやっちゃいなよ >>210
>>205で関数と考え方は出てるのに
何言ってるの？？？？？？？ 質問です
請求書において最終的な税込価格を1000円単位で丸めたいので項目に値引き欄を作りました
現在は見当を付けて値引き欄に何度か数値を入れ直して税込み価格を丸めているのですがもっとスマートな方法を教えてください >>212
合計かける(1+消費税率)から
合計かける(1+消費税率)をrounddownしたものを引いた額を割引額じゃあ駄目なん >>213
それだと消費税率の税率分が引かれません
>>215
端数の処理が… >>212
値引き後の税抜価格=ROUNDUP(ROUNDDOWN(値引き前の税抜価格*1.1,-3)/1.1,0)
値引き額=値引き前の税抜価格-ROUNDUP(ROUNDDOWN(値引き前の税抜価格*1.1,-3)/1.1,0) あ、軽減税率とかやるんなら1.1のところを1+税率にしてね >>217
あとで試してみます
ゴールシークが関数のように埋め込んで使えたら便利そうなのに 俺の脳内
スピル → 時空戦士スピルバン
ピボット → ホビット
ゴールシーク → ゴールドオーク 入力済みのサーバーに置いてあるファイルを
入力前の同名ファイルで上書きしてしまった・・・
どうしようも無いよね？ >>221
ファイルのプロパティから以前のバージョンで前回のバックアップに戻せるかも。
サーバーしだいだが >221
DROPBOXやdirectcloudみたいなサービスならすぐに復元できる
ただのサーバーや外付けhddではかなり難しい 横方向SUMとかを縦にスピルしたい話
>>207
SUMも =SUM(A1#) とかはできるので、
一旦横方向にSUMしたものを縦にスピルはできない、という意味ですよね？
そういう「対応していない」関数の一覧は、どこかに公開されていますか？ありましたら教えてください。
検索だけならかなりしましたが、どこのサイトも「スピルならこれができる！」ばかりで、
「こういうのはできない」とはほとんど書かれていませんね。
1行ごとに横方向SUMを縦に伸ばす使い方なんか、Excel初心者講座でも出てきそうな使い方なのに。
前述のようにSUMなら「+」CONCATなら「&」と置き換えができて、
かつ項目の数が少ない場合は、代用しようかと思います。
コピペ使いまわしの時に最終行を気にしない＆範囲指定にOFFSETやCOUNTを使わず視認性が高い
というスピルのメリットは、やはり大きいので。 >>227
試すしかない
SUMは関数の性質上出来ないだけ
あとスピル使うとソート（関数じゃなくて機能の方）も出来なくなる >>217
ありがとうございました。なんとか目的を達しました https://i.imgur.com/yHuvyyx.jpg
A列に入力した年月日をB列にTEXT関数で6桁の数値として入れています
画像のように、同じ年月日が2つ続いた場合に例外的に-2を付加したいのですが、どういった形で作るのが最もシンプルでしょうか if関数で上のセルと同じ値なら、& "-2"とするのがシンプルじゃない？
3つ続く可能性があるとかなら、別だけど。 作業列作ってもよい場合
３つ以上ならc列に自分とこまでを範囲としたcountif日付で算出させる
c列の値が2以上ならb列に&-c列で繋げる =TEXT(A2,"yymmdd")&IF(A1=A2,"-2","") 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
１シート目：CSVデータを従来のウィザード→テキストから（レガシ）で取り込む
２シート目：=TRIM('Sheet1'!A2)やこれに必要文言を組み合わせる程度の関数で引っ張っている
このとき、1シート目のデータが2行以上になると、一番下のセルから引っ張ってしまうのですが
常に一番上にする解決方法はありますか？
１シート目２シート目、ともに1行目は項目行です。
抽出するデータが常に何行、と決まっているわけではないため、
絶対参照とするのは応用できないので解決にはなりません。 PowerQueryで読み込み加工すれば解決するような >>235
＞このとき、1シート目のデータが2行以上になると、一番下のセルから引っ張ってしまう
行の挿入みたいな挙動になるって事？
ならないんだけどなぁ
indirectなどはどうだろう
=INDIRECT("Sheet2!r2c1",0)
=INDIRECT("Sheet2!r"&ROW()&"c"&COLUMN(),0) すみません、間違ってました。
このフォーマットで取り込んだ後、
データ→更新をして2行以上のcsvを取り込むと
一番下にあるデータしか持ってきてくれない。
(引っ張ってくるシートの関数もA2がA5などにずれる)
これの原因が知りたいです。 >>237
Indirectとrowを組み合わせたら出来ました。
ありがとうございます！ 引っ張ってくるのは関数で抑え込めたのですが、
更新した場合に引っ張ってくる関数が
一番下のを持ってきてしまう事象の原因は何なのか
わかる方いたら教えていただきたいです…… 横方向SUMとかを縦にスピルしたい話
>>228
頑張って試したのですができなく、もし方法があったらと思いここへ来ました(´・ω・｀)
なんとなくどういうパターンの関数ができないのかは分かってきましたが、
せっかくの便利な機能なのでもっと活用できたらいいなあと思う次第であります。
あースピルはソートできないんですね。これは盲点でした。
常時全項目ソートできないといけない場面なんてほとんど無いので、必要なときだけ
従来の =$C1（C列にスピルがある）とかでソートできるようにして対応します。
ありがとうございました。 >>240
全体的に抽象的すぎて何をしているのかよく分からないから、
テストデータと実際に使っている関数でも出してくれないと答えよう無いのでは 外部データの更新方法って、オプションで上書き更新するか、挿入更新するかみたいのが選べたはず
セル参照してたのがズレるのを防ぐためのやつ
その設定が思ってたのと違ってたんじゃないのかな 一番下のがずれるんです
横のはその設定だとずれません お前が先に出せよ？
出せないのに人に注文つけんなよ？ >>243
説明が下手で申し訳ない
初めてのことだったので伝え方が分からず……
>>244 のレス見て設定を変えたら解決しました。
ありがとうございます。 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
OSは64ビットなのですが、アドインが32ビットのみ対応のため、32ビットで使用してますが、4から5ブックを開いたまま新規にエクセルを起動したり、操作していると応答なしになったりします。昨年末購入したPCはCPUはI9-9000K、メモリ64GB、起動ディスクは1TB NVMe SSD (M.2 2280, 読込速度 3200MB/s, 書込速度 3000MB/sで、300GBほど使用しています。アドインを諦めて、64ビットにしたら改善されるでしょうか？ >>250
PCの性能は十分すぎる
アドインが必要なら互換モードとか試してみると良いかも
アドイン不要なら64bitに上げた方が良い。俺も間違って32bitインストールしたら不安定になった事がある
数年前までは64bitには上げないほうが良いって言われていて、そういう記事もまだ残ってるけど気にしない >>251
ありがとうございます。早速試してみます。 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
提案書を作りたいと考えています
提案したい事が10個以上あるのでパワポではなく、エクセルで一覧表を作成しています
縦列に提案したい事(10個以上)、横列に項目を入れたら項目数が多いからか書類の向きを横にしてもひとつひとつが小さくなり読みづらくなりました
解決する術がありましたら教えてください
ちなみに横列の項目には、番号、タイトル、分類、課題、提案詳細、メリット、デメリット、予算、備考を記載しています
表以外の術があれば教えてください >>253
そもそもこういう場合はWordの方がいいですかね？
久しぶりに作るのでわからなくなってきました
パワポで作るほどでもないですし、どうしたらいいんでしょうか 最終的に何で提出するかだけど
Excelのままなら横に広くてもいいんじゃないの
セルに折り返しでも設定しておけば >>255
印刷します
>>256
張り付けて編集することもできますよね
確認します！
ありがとうございました 【1 OSの種類 】 Windows10
【2 Excelのバージョン 】 Excel2016、office365版
【3 VBAが使えるか 】 いいえ
【4 VBAでの回答の可否】 いいえ
A1にはA10～A210の平均値
A10～A210には数値をA10、A11、A12といった感じで入力
B1、C1、D1(項目別)・・・と同様ですが、項目によって50～200個と入力する数値に違いがあります
これに、A2にA10～A210に入力された数値で直近の30だけの平均値を表示させる方法はありますか？
A10～A150まで数値が入力されていたらA121～A150までの平均値をA2に表示、
B10～B60まで数値が入力されていたらB31～B60までの平均値をB2に表示といった感じです。 Webページの一部をExcelに貼り付けて、そこからリンクのURLの一部を抜き出したいのですが、
＝リンクが入っているセル
と指定しても、リンクのURLではなく表示されている文字がそのまま出てきます(当たり前ですが)
リンクの中身https://～を別のセルに表示させるにはどうしたらいいでしょうか？ >>258
下から30個取りたいということだよね？
countとoffsetで行けるべ >>259
URLがどういう状態・式で入ってるのか分からんと何も言えんべ =average(offset(A$10,count(A$10:A$999)-1,,-30))
999は、使い方に合わせて適当に
使ってもいない範囲を見込みで999とか指定する方法は嫌う人もいるので、
他にカチョイイ式があったらそっちをどんぞ
計算対象データ数が30も無いとREFエラーになったり循環参照になったりするんでまあ頑張れ いえ、下から30ではないです。
平均を取りたいだけです。30件は場所は変わりますが変わっても平均はそのままにしたい。 >>264
下から30件の平均、という意味だったんだけども
>>262の式見てよ… Excel365だけど条件付き書式で複雑な数式使う時どうしてる？
気合で数式を手打ちする？
ヒント出ないしもタブキーでカッコも出ないしスピルも使えないし何かいい方法ない？
アドインとかさ メモ帳で書いてコピペ
address・indirectを多用すると、テキストボックスの枠より長くなるので見づらい >>259
vbaで
Cells(1, 2) = Cells(1, 1).Hyperlinks(1).Address
>>266
基本的には気合だけど、
あまりにもしんどい時はセルに入れて確認するかな
そっちのほうが確認しやすい事が多い
循環参照には注意 最近使ってないけど、今でも修正にカーソルキーが使えないまま？ >>270
今でもというか昔からF2でカーソルキー使えるけど 【1 OSの種類 .】 Windows**
【2 Excelのバージョン 】 Excel** office365
【3 VBAが使えるか .】 いいぇ
【4 VBAでの回答の可否】 否
基本的な事で申し訳ないです。
シートの式を別BOOKに貼り付けたいのですが、元のBOOKを参照してしまいます。
数式タブの数式の表示からコピペすれば大丈夫でしょうか？ >>272
別シートへの参照を含んだ数式なんじゃない？
その場合はどうしてもそうなっちゃうでしよう。
対策としては
・貼り付け時に値貼り付けをする
・別シートへの参照には、indirect関数を使用する
・そもそも、シートをまたいだ数式を使用しない >>273
仰る通り別シートを参照しているんですが値で貼り付けてもうまくいきません。
ちょっと明日も忙しいのでそろそろ寝ますね >>272
シート名が同じなら、元の数式をコピペでメモ帳に貼り付けてから、それを別のブックにコピペする >>275
ありがとう！
出来ました。助かりました。 1 OSの種類 .】 Windows10 64bit
【2 Excelのバージョン 】 microsoft office excel 2007
【3 VBAが使えるか .】 多少
【4 VBAでの回答の可否】 可
印刷設定と改ページに関する質問です。
日報の雛形を作成中なのですが、
タイトル見出し6行程度・印刷タイトルにて設定中）
入力欄（6行+余白1行）×24
といった形式のファイルを、
タイトル見出し（6行程度・印刷タイトル）
入力欄（6行+余白1行）×3
を1セットとなるように改ページを設定しております。
上記に入力漏れなどがあった場合に入力欄を1セット追加ないし削除して運用したいのですが、その際に改ページ設定を元通りの形式で適応させる方法はありますか？
作業グループに元データを入れてページ設定ダイアログを開く方法等も検討してみたのですが、うまくいきませんでした。
お心当たりのある方、ご回答のほどよろしくお願いいたします。 俺もそんな依頼受けることあるけど、
まず紙で提出とか時代遅れだからやめようねって答えてるわ Web版Excelって使いにくくないですか？
コピーのオプションに「元の書式の列幅でコピー」が無くて困ってます
あと印刷プレビューが無くてもきちんと印刷範囲を思いどおりに指定できてます？
どうにもそこがわかんなくて >>284
デスクトップアプリで開けばよいのでは？ >>285
それはわかってます､Web版でやりたいのに出来ない事があるから困ってるわけです 勝手に思い悩んでる段階で書き込むな
どうやっても自力では解決できなくなってから書き込め 新規でセル開くと画面が全部灰色なうえに一切のコマンドが使えなくて完全にお手上げ状態
ありとあらゆる方法を試したが未だに解決に至ってない >>291
＞新規でセル開く
新規でブックを開くの間違い？
＞ありとあらゆる方法を試したが未だに解決に至ってない
再インストールした？
恐らく再インストールで直る officeアカウント作っていればWebから落とせるよ >>292
ありがとう
新規ブックの間違いだったw再インストールでやってみるよ Windowsのアップデートファイルを削除していたら、Office2010がまるっと消えてしまったよぉ､、
中古で買ったPCだから復元できねぇーーー！
ファイルの日付しか見てんかったけど、なぜOfficeが最近の日付？
しかもなぜ全部消えるのだ！
クソー！（JB風に) オフィス365を月払いしてたけど定額請求を止めたのに､まだExcel使えるのがよくわからん >>282
>>283
返信が遅くなって申し訳ございません。
>>281です。
役所からのチェックが入る書類ですので、印刷して保管しておかなければならないものです。
フォーマットは多少いじっても良い、使いやすくしろとの事なので何処かでお知恵を借りたいと思った次第です。 役所にPDFでチャックさせればいいと思う
ゴネれば対応してくれるよ
うちもそうした
電話番号ないと受付できないなんて言うのも窓口の思考停止人間が言うだけ
ゴネれば困るのは向こうなのでたいしてくれる 今晩は、よろしくお願いします。
時間が１秒単位で行に並んでいます。
(表示としてはhh:mm:ssとなっています。)
5秒経過ごとに行を抽出したいのですが、絞り方がわかりません。
分かる方、いらっしゃいますでしょうか？
オートフィルタでは上手く抽出出来ませんでした。 すみません。>>281の状態を記載し忘れていまいました。
【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否 連レスすみません。
>>303は>>302の誤りです。 >>302
作業列作ってフィルタしてコピー
https://i.imgur.com/1KxGmp0.png
B2=IF(MOD(SECOND(A2),5)=0,TRUE,FALSE) 「先頭のシートにスクロール」のショートカットキーってありますか？
マウスジェスチャーに登録したいです。 >>307
you 他にジェスチャに登録してるもの教えてよ you
F4とか便利そうよね そもそも手を使う理由が分からない
ずーと口だけでやってもらいたいのに
あごが疲れたとか言って
手でシコってるの
手抜きすんなと言いたい どうすればっていっても、自動ってどういう意味だ？
あるフォルダの画像ファイルを次々に貼り付けるのならマクロでできそうだけど
値段と店名は自動で入れるためには元データがないと無理だろ 店名はGPSから大体わかる
値段は電子マネーの支払データから取得すればいい アホかと思ったが、画像から名前を調べる方法があるらしいから、本当に出来るのかもな。
店名はレシートをOCRすりゃいいんじゃね?
2003ならOCR機能ついてるし。
ていうか何で2013にはないの? 茶色いとかそういうレベルの問題じゃないと思ったけど
まあ昼ならこんなもんか、とも思った 質問が理解できてないのに回答しようとするアホ
>>321
＞アホかと思ったが、画像から名前を調べる方法があるらしいから、本当に出来るのかもな。
＞店名はレシートをOCRすりゃいいんじゃね?
＞2003ならOCR機能ついてるし。
＞ていうか何で2013にはないの? >>317-323
次郎限定なら存在する。写真だけで全データを取得できそうだ
https://internet.watch.impress.co.jp/docs/yajiuma/1076780.html
>>317
けどまぁそういうことを言ってるんじゃないだろう
ただ、データがどういう風にあるかわからんから手動で回答すると
・フォルダに画像をいれてドラッグアンドドロップ
・F5→セル選択→オブジェクトで選択
・メニューの図の形式から適当に編集
後は値段と店名を手動で入力
これぐらいでいいんじゃね エクセルで、じゃなくてそういうアプリを作ったらどうか
どうせ撮影するのはスマホなんでしょ？
撮影する際に店名とメニュー名と金額を入力する手間は毎回あるので自動ってのは厳しいかもしれん
季節によって盛り付けが変わってもどの角度から撮った画像からでもメニュー名を言い当てる機能を持たせるのは極めて厳しい PowerAppsで作ってリストに保存すりゃええね 勝手に仕様を決めるなよw
思い込みだけで仕事してんのか普段 本人が仕様を詳細に述べないんだから勝手に決めるしかないだろ 誰もそこ聞いてないじゃんw
もしかして、言われたことやるだけの人？ 最初から情報出さない奴には適当に答えるのが当然の態度だからなあ
教えてやるというよりは思いついたから便所の落書きに書いたという程度
的外れだろうが何だろうが、元の情報が不完全だからどうでもいい 日本語って主語を省略する言語なんだけど、知らなかった？ 仕様書に不足が有るなら常識的な範囲で補完すればよかろ
誤りがあるのならこの仕様ではできませんと拒絶をするか、ここを変えて構わなければできると提案するかで
人事的な評価は変わるかもね 相談者が追加情報出さないんだし、もうどうでもいいんじゃね？
相談者見てるかどうかも怪しい 本人が内容を理解していない質問は他人にも理解できないので適切な回答が得られない >>323
俺の最近の昼飯を自動でエクセルの表にして
横に値段と店名を入れたいという意味だろ?
理解できてるよ
お前はどう解釈したのかな? ん?
まさか店名を手入力するつもりじゃないだろうな?
そんなアナログなことするならここに来る意味ないよ お前立ち食いそばでレシートもらうの？
現実を考えろや 条件付き書式で、10日前から今日までセルの文字色が変わるようにしたいのですが、
=A1-10<=TODAY()
上記の書式だと明日以降もセルの文字色が変わったままなのですが、
これを、10日前から今日までのみセルの文字色を変えるにはどうすればいいでしょうか。
ご教授お願いします。 指定文字の列がグループ終了横に存在し指定文字ごとに和を並べます
例えば2列目のA～AAの中にAB1,AC1と同じ文字があればその同じ文字の列の3行隣りの数値の和をAB2,AC2に表したいです >>353
その式だと今日から10日以上前になってるね
between関数使うと解決するんじゃないかな >>356、357
ありがとうございます。and関数で上手くいきました。 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel365
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
複数のシートを一つのシートにまとめたいんですが可能ですか？
縦に並べたいです。 >>350
え、貰わんの?
>>351
店名がわかっても金額がわからん >>350
流れ次第かな
店員が受け取らない前提でテキトーに差し出すならもらわん
新人さんが一生懸命受け取って！って感じだともらう
基本的にはもらわないけど
>>354
基本的には
ただエクセルよりも数字を見ることの方が大事かな
>>359
コピペじゃいかんのか dec2hexとかってスピルできねーのかよ糞が
もっとスピルなんとかせい >>359
ひとつのシートにまとめる(縦に並べる)ということは、
まとめる対象のシートの列構成はすべて同じですか?
VBAマクロが不可なのはなぜですか? >>363
完全に法則性があれば数式でも可能
2行だけ、ファイル名が1,2,3・・・など
https://i.imgur.com/RxwR7Nt.png
最終行もファイル名もバラバラだと、vbaないと難しいと思う
500ファイルならVBAごと覚えた方が早いとは思う >>359
VBA不可なら、状況は限定されるがマイクロソフトクエリでSQLでUNIONとか。
もっと難しいか。 >>365
VBA不可って書いてるのにそれを曲げようとするこのスレの奴らは何なの？ >>365 の件をPower Queryでやろうとすると
1. 全ての表をそれぞれクエリーに読み取らせる
・「テーブルまたは範囲から」
・結果をシートに読込ませずに接続専用にしたままでも可
2. 最初のクエリーに「追加」で他のクエリーを追加する
3. 表をテーブルに変換しただけでの「追加」は出来ない
4. 列見出しが少しでも異なっていると、別な列と認識される
というところか。 日本語で主語がないのを気にするとかどこのキチガイだよ VBA不可なのにPowerQuery薦めるのはいかがなものかと
1ファイル1分として、1日で終わる量だし、地道に手作業で進めたら良いと思う >>359ですが
>>362 500もないですが結構多くて、毎月の作業になりそうなんで簡単に出来ないかと思いまして
>>365構成はバラバラです、紙をスキャンしてエクセルにするソフトを使って出来たエクセルです
VBAは全くやり方わからないです、、
>>369>>370VBAが自分で出来そうか入門サイト見て見ます。普通のエクセルすら使いこなせてないから難しいだろうけど >>354
そうとも限らん。
営業事務では見積・納期対応・不良対応で、図面の知識なり緊急時の思考力なりが必要。
上司に聞いても「図面見ればわかるじゃん」とか「営業に引き取りを頼め」とか言われる。 >>377
列構成がバラバラということであれば、
そもそも一つのシートにまとめるべきではないのでは?
例えるならば、複数の住所録データを一つのシートに
まとめたはいいものの、最初は郵便番号の列だったのに
途中から住所になったり会社名になったり電話番号になったり
してしまう感じ。 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
A1～A1000まで名前が入っていて、重複分を除いた名前を抽出したいのですが、いい方法を教えていただけますでしょうか。 リボンの［データ］タブの［重複の削除］機能でいけるんじゃないの >>383
ピボットに突っ込むという方法もあるけど、
>>384が一番楽 >>377
それ、そもそも紙を1枚ずつスキャンじゃなくて、
連続でスキャンすれば最初から1シートにはならんの? >>377
OCRソフト？でスキャンした各表A、B、C・・・のそれぞれは、毎月同じ列見出しの構成？
「構成はバラバラ」というのは、
各表の列見出しには共通の列見出しa、b、cがあって(タイトル名は異なっていても可)、
順序が違ったり余計な列があって「バラバラ」ということ？ >>383
これじゃアカンの？
元表に"a"が二つ重複
https://i.imgur.com/NN5esFp.png
↓
「重複行の削除」をした結果
（詳細エディター内のスクリプトは自動生成）
https://i.imgur.com/DyOL8kn.png
元データが変わるなら、その都度クエリー「テーブル1」を更新 >>391
おまえ頭おかしいだろ
普通の日本人なら主語がなくても理解できるぞ 「主語は?」を流行らせたいのかも知れんが、
はっきり言って面白くない、センスがない、絶対流行らない。
あと自分の書き込みを読み直してKYさを自覚しろ。 >>383
空白出したくない場合は
=UNIQUE(FILTER(A1:A1000,A1:A1000<>"")) こんな程度の低い反応する奴が釣られるから居座ってんだろ？こいつが元凶。
>>395
＞「主語は?」を流行らせたいのかも知れんが、
＞はっきり言って面白くない、センスがない、絶対流行らない。
＞あと自分の書き込みを読み直してKYさを自覚しろ。 こんな程度の低い反応する奴が釣られるから居座ってんだろ？こいつが元凶。
>>405
＞こんな程度の低い反応する奴が釣られるから居座ってんだろ？こいつが元凶。 いちいち「私は～」とか「僕は～」とか言ってる人なのかな
なんか発達障害ありそう 結局お前もわかってないな。
クズ共が考える価値観とかクズ共が何を考えているかなんて
自分は興味がないしどうでもいいんだよw
スルーできずにいちいちケチつけてくるクズ共がウザいだけw
だいたい低脳のクズ共と会話が成立するなんて思ってないからw
自分の価値観だけを押し付けてケチつけてくる低脳のクズ共に
真面目に言い返したって会話が成立しないんだから意味がないだろw 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
ブラウザから は普通にhtml化したスプレッドシートを見られるのに、
WebQueryで見ようとすると、たまにログインが解除されて見られない。
何かいい方法ない? それは日本人の省略の仕方じゃないな
日本人なら「は」まで省略するから
主語は「自分は」であって「自分」じゃないから 日本人なら411で間違って書き込んでその続きを412でやってるとわかるだろ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
マリオとテニスでW256みたいな、その組み合わせでそんなことになるのかという使い方はありますか? 「主語は?」を流行らせたいのかも知れんが、
はっきり言って面白くない、センスがない、絶対流行らない。
あと自分の書き込みを読み直してKYさを自覚しろ。 僕は荒らしだけど一言だけ言っとくね？
荒らしに反応する君たち全員荒らしだよ？
本当にスルー出来ないのかな？
スルーできない限り僕は現れるよ？
理解出来るよね？ クソつまらんジジイほどしつこいからな
早く死ねよ本当に >>425
ほら
君もスルー出来ないんだね
君も荒らしの仲間入りだね
良かったね >>425
おまえの名前、変すぎて読めないぞｗｗｗ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2007
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
古いバージョンで申し訳ないのですが、EXCEL2007で日付の表記を書式設定より令和に対応させつつ、来年以降も自動で3年、4年と表記を変更する方法はありませんでしょうか？
ggge"年"m"月"d"日"ですと平成32年○月○日になるので、e"年"部分から30を引くか、下一桁のみに出来ればうまくいきそうなのですが、何かその様な方法があれば教えて下さい。 date関数でyearのとこだけ30引いたらできないかな
平成も使いたいならifで判定 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
excelで乱数の発生確率を指定したいです。
例えば100個の乱数のうち30%が50未満の様に表示させたいです。
皆さんのお知恵をお借りしたいです。よろしくお願いいたします。 最初の30個が全部50以下になるけど、countifで自分より前の範囲で50以下が30個以下なら割る２、そうでないなら50以上になるよう調整でいけるかと >>432
>>433
ご返事ありがとうございます！
50以下の数字はランダムに発生しないといけないのです；； >>435
最初の30個が続けて50以下だと良くないのです。
1~100までの数がのうち、50未満が30個、50以上が70個、ランダムに発生する状況が望ましいのです。 >>436
終わりの30個を調整すればある程度ランダムになるけど、それ以上を求めるならVBAかな >>437
自力で解決出来ました！
=RAND()*100*(1+(1-0.3))
これで約30%の乱数が50以下になりました！ 166まででちゃだめだろ
ふつーにifで分岐して50以下なら30/50にする
50以上なら-50して70/50して+30だな >>439
ご指摘ありがとうございます。
考え直してみると、上手く行ってませんでした。
アドバイスありがとうございます！！ 乱数って仕事で使い道ある?
ゲームくらいしか思いつかん >>441
数式やVBAの動作テスト用ダミーデータを作る やっと出来ました！皆さんありがとうございました！
=RAND()*(100-20)+20 乱数の件俺も知りたーい
Excel365
VBA不可
バイト君達の作業ローテーション表を自動で作りたい
1週間ごとにローテーションする
2人1ペアで作業をする
1週間後の作業は前週とは違う人とペアを組む
作業者リスト
1 Aさん
2 Bさん
…
30 ADさんまでの30人
作業リスト
作業A
作業B
…
作業Gまでの7種類
余った人は空欄にする
作業Aと作業Bは重労働の為、A→BやB→Aは1ヶ月以上空けてAB以外の作業をさせる、又は空欄にする
作業A～Gと空欄を満遍なく割り振りたいんだけどできますか(>ω<) 教えてください。
シート上に、ActiveXコントロールを設置しました。
複数行書き込み可能で垂直方向にスクローラー付きのものです。
このテキストボックスなんですが、フォーカスがはずれているときと、
中のテキストにフォーカスしてカーソルが出ている編集可能状態のときでは
文字のフォントが違うみたいなんです。
編集状態だと細くて見やすいのですが、フォーカスをはずれると太くて見にくいフォントになります。
これの原因、および修正方法を教えてください。
よろしくお願いします。 >>436
=(RAND()>=0.7)*50+ROUNDDOWN(RAND()*50,0) スクショ見せて
>>448
＞教えてください。
＞
＞シート上に、ActiveXコントロールを設置しました。
＞複数行書き込み可能で垂直方向にスクローラー付きのものです。
＞
＞このテキストボックスなんですが、フォーカスがはずれているときと、
＞中のテキストにフォーカスしてカーソルが出ている編集可能状態のときでは
＞文字のフォントが違うみたいなんです。
＞編集状態だと細くて見やすいのですが、フォーカスをはずれると太くて見にくいフォントになります。
＞これの原因、および修正方法を教えてください。
＞
＞よろしくお願いします。 >>448
そういえば、Windows10にしてからそうなったわ Excelのバージョン次第でActiveXはただのボタンでもそうなる
使わない方がいい。つか使うな 使う場合はユーザーフォーム限定にしておかないと危ない
シート上に貼ったらいかん 見づらいことは大した問題じゃないから解決する必要はないし、ActiveX使うなってのが正論だ。
この話これでもう終了だろ。スクショもいらん。 >>429
>>430
遅くなりましたがありがとうございました！
関数は別セルに事前入力が必要な為断念した次第です
アドインの導入、検討してみようと思います！ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 はい かなり忘れたけど
【4 VBAでの回答の可否】 可･否
例えば秀丸エディタでは指定した分バックアップが作れる(text.txt.bak001…みたいな）けど、
Excelでそう言う風に編集前のものをどっかに保存って自動で出来ないんですかね 普通に初期設定で自動保存だろ
ストレージを無駄に消費するからインストール直後にすぐ切る機能 自動保存ではなく世代管理みたいな意味合いで言ったんだけどね。
↓にバックアップの作成の仕方があったんでこれでいいや。
上書き前のデータに復元したい！エクセルやワードファイルを復元する方法
https://www.4900.co.jp/smarticle/9617/
1-2.バックアップファイルの作成機能を使う
ども。 自分で解決できるなら聞かないでほしいな
自分で努力して努力してそれでも無理なら聞けばいいと思うけど すぐに人任せだと、何もできない、何も考えられない人間になるよ 初心者で今エクセル勉強中なのですが、書いている文章の行？列？が微妙に合わないのってどうしたらいいんですか？
例えばこの履歴書の志望の動機って場所に文章を書くと微妙にずれます。
きちっと一定にはできないんですか？ >>467
その履歴書の様式ブックはどこからダウンロードしたものですか?
公開されているものですか?
ずれる原因としては、
プロポーショナルフォントを使っている
フォントサイズが異なる
など考えられますが、どのようにずれているかを
架空データを入れたブックまたは
スクリーンショット(画面イメージ)で示してもらうと
いいのではないでしょうか。 派遣先でAlt+Enter使いたいって言ったら「高度なこと止めて」と言われた。レベルが低すぎて引いた。 必要な個数だけ全角スペースを入れれば改行したのと同じ見た目になる 派遣の奴のボヤキ、本気で聞く必要ないだろ
大抵が思い込みなんだよね
状況が理解できないからこいつら グラフの軸ラベルを手入力せずに設定する方法ってないですか？
たとえば特定のセルの値とかシート名とかを自動的にラベルに使いたいです
Excelは2016 Pro Plusです 自己解決
普通にラベルをクリックした状態で数式バーに移動して「=」を入力してからセル選択すればできました 【1 OSの種類 】 Windows7
【2 Excelのバージョン 】 Excel2003
【3 VBAが使えるか 】 はい
【4 VBAでの回答の可否】 可
Web pageや他の所から取り込んだ写真(JPEG fileなど)をExcel図面に貼り付
けた時に、大体、サイズが大きすぎるので縦横40～70％くらいに縮小して、
端の余分な部分をトリミングする。
dialogue box「図の書式設定」→tab「図」→push botton「圧縮(M)」
→dialogue box「図の圧縮」
図の圧縮(C):ON 図のトリミング部分を削除(E):ON 「OK」を押下
ここで上記の操作をしたら、これをする前よりも、図を縮小した分だけファ
イルサイズが小さくなっているはずである。
トリミングした時は小さくなっているが、図を縮小だけした時はファイルサ
イズは変わっていない。
図を縮小した時に、なるべくファイルサイズに反映できるようにできないで
しょうか。
以下のExcel2010の説明では、最初の設定によっては自動的に図を圧縮する
みたいだが、これをそのまま当てはめて考えることはできないみたい。
http://www4.synapse.ne.jp/yone/excel2010/excel2010_zu_assyuku.html エクセルで「並べて比較」とやるとデフォルトで連動して動くのチェックがはいった状態になりますよね？
これを連動して動かないのをデフォルトにする方法って無いですかね？
というか同じ書式のフォームを見比べるなら便利でしょうが、そう言ったケースってあまり無く無いですか？
因みにこれはエクセル97からずっとそうだったと思います。現在使っているのは2019 【1 OSの種類 】 Windows10
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか 】 はい
【4 VBAでの回答の可否】 可
ある計算表になっているシート上にコマンドボタンを配置し、それをクリックしたら以下のような動作をさせたいです。
こんなことが可能なのかどうか、可能であるならその方法をざっくりとでもいいので教えてください。
①自分（ブック）と同じ場所にある請求書.docx（ワードファイル）の、所定の場所（項目名と金額欄だけ空白になっている）に、
シートにある2つのセルの値（項目名と金額）をコピペする（画面上ではワードは起動しない方が望ましい）
②そのワードファイルのファイル名を変更する
以上です。
同じマイクロソフトオフィスだからできそうな気もするんですが、いかがでしょうか？ >>482
wordの参照設定して、wordのvbaで検索と置換。
雛形に項目1とか入れて置き換える。不要なデータは空白に置換
保存はword VBA のsaveas2メソッド >>483
ワードファイルの方にはVBAやマクロを付けることはできないんです。
100パーセントエクセルVBAの方からの操作だけでこれを実現させたいんです。
無理でしょうか？ なんで最近のノートパソコンって真ん中じゃなく左寄りにドラッグする所が付いてるんですか？ >>484
VBSですら出来るのに
Excelが出来ないわけないと思いませんか？ >>474
派遣先の人らは475さんの言う方法（全角スペース連打で調整）や１セルに１行でやってた。
スペース連打なんてズレたりするのにな。ググりもしないで聞いてくるババアだったよ。
そのファイルに限っては（俺が）めんどくさそうな態度で従って、他のファイルは勝手にAlt+Enterでやってたよ。 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可 連投すみません。
オートフィルタした状態である列を複数行コピーして、
そのまま値貼付けすると、フィルタされていない行まで貼り付いてしまい、
選択した行が貼り付きません。
一番簡単な方法を教えてください。 >>484
EXCEL側ですべてやります。Word用のVBAコードを使用する必要がありますが
参考に↓
https://kosapi.com/post-3986/ >>491
たいへん助かりました。
ありがとうございました！ へえ、Alt+Enterなんてあったのか
いつもメモ帳で改行してセルクリックしてコピペしてたよ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
新規ファイルから作成後、「ページ設定」のダイアログを表示させると、「ページ」タブの拡大・縮小や「余白」タブの上下左右の余白の数値（▲や▼で値を上下させるところ）がボックス内で半分上にずれて表示され大変見にくいです。
直す方法があれば教えてください。
よろしくお願いします。 エクセルをそのまま印刷したものと、PDFに変換して印刷したものも、印刷すれば全く同じですか？ >>496
違う
pdfに変換するソフトと、プリンタドライバの影響を受ける
基本的にエクセルでは同じ物を印刷できないと思っておいたほうが良い >>497
ありがとうございます
どっちで印刷するのがオススメですか？
PDFで印刷したらPDFをそのまま印刷した感じになりますか？ >>498
そのまま印刷でいい
わざわざpdfに変換する理由がない でもpdfだと母ライバーの影響を受けないんですよね？ VBAのSaveAsで保存したら特定のセルの書式が変わる。なんで？ PDFも印刷できるやつとできないやつがあるんだよなあ
だからいつもセブンでXPS印刷してる いえ、コンビニで印刷する予定はありませんので、この話は別でやってください Pdfの方が依存するものがなくなるのでオススメですよね？
プリンターによって端が切れたりするのを避けたいので >>506
端が切れるのはプリンターのせいでは
ふちなし印刷ができない機種は今どき少数派だと思うけど いえそプリンターの細かいところはこの際無視してください
PDFで切れてなければどんなプリンターでもそのままでますか、というのが質問になります >>506
pdfの方が安全だよって答えを欲しいんだと思うけど、
ここではそんな回答は誰もしない
エクセルのままで切れないようにするのがベター
>>509
「どんなプリンターでも」なんて言うと間違いなく例外出してくるぞ
pdfで端が切れていなければ基本的には印刷も同じように出る
なんか用途を言ったほうが早い気もする PDFがA3でプリンターがA4しか印刷できなきゃ切れる
まあ分割印刷すればいいんだけど
ほかにも、PDFのバージョン違いとかフォント不足とか、モノクロレーザーでカラーが印刷できないとか解像度が足りないとか、文書が100%再現できないケースはいくらでもあるぞ PDFで変になったことは記憶にないが、PDFがプリンタに認識されず印刷できなかったことは何度もある 初心者なんですがそもそもPDFって何のためにあるんですか？
改変出来ないから見やすいとかですか？
なんかネット上の紙の役割をしてるというのは聞いたことあるんですけど OSやデバイスの影響を受けにくい
ここに書き込むよりググる方が早く幸せになれるよ >>514
アプリやプリンターやOSが変わっても、できるだけ綺麗で同じに見えるように印刷したい
それで考案されたのがPDF
PDFが普及する前は印刷のトラブルが今よりずっと多かった >>514
そもそも印刷は例外的な利用
画面上で同じものを見られるというメリットが最大の存在理由
その上で印刷がずれたら、プリンタの仕様を把握して画面見ながら合わせてねってのが基本 オーナーパスワードを設定したPDFを作成したいのですが、VBAで可能でしょうか？ >>521
アクロバットでは無理
QPDFというフリーのpdf作成ソフトなら可能のようだ
http://pdf-file.nnn2.com/?p=867&;cpage=1 VBAのSaveAsで保存したら特定のセルの書式が変わる。なんで？ エクセル使いこなせる職種ってなんですか？
やっぱ役所とかですか？ >>525
会社による。エクセルが得意なら転職エージェントでも頼ってみたらどうだろうか
個人的な感触は
零細は営業から社長までみんなエクセル中心
中小は事務が中心に使っている。けど営業も使えたほうが効率がよい。なんか知らんがおっちゃん営業は「オートサム」「シグマ」って単語が好き
大企業はエクセル自体使わない
エクセルが使えるからどうではなく、あくまで道具としてエクセルを使えないとあまり意味がないよ >>525
何処でも重宝されるのは集計表くらいだからそれさえ出来ればいい
ちゃんとした集計表作れるやつがこのスレに居るとは思えないが >>529
ここ20年で事務も営業も分析が主体になった
今どきエクセルばかり使う職種なんて無い
20年ぐらい前の事務はエクセル最強だったけどね。エクセルでしょーもない請求書を作る作業がもてはやされた
強いて言えば中小企業の営業か。営業で自前でエクセルで分析できれば強いと思う
中小企業の事務のおばちゃんはPCに弱いからな
>>527
プログラマはエクセル苦手だよ、その嘘はやめてあげて 嘘書いてるのはお前
【4 VBAでの回答の可否】 不可のお前には本当なのかもしれんがな >>530
エクセルじゃないならどういったソフトを使うんですか？ Excel苦手とかVBAを馬鹿にしてるようなやつらは、
PGとしては3流なので、PGにカウントしないでくださいね。 >>532
今は群雄割拠の時代。エクセル、アクセス、kintoneが多いけどこれってソフトがない状態
https://www.itreview.jp/products/kintone/reviews#tutorial
>>533
エクセルは全セルがvariant＋セル内容で勝手に型が決まるのがキツすぎる。動的にもほどがある
ぶっちぎりでキツいのが住所の「1-1」
OSの言語設定ににも左右される
馬鹿にしてるんじゃなく、自動変換ルールが多様すぎて収集がつかない
エクセルの変な変換を通さなければルーチンに問題はないよ >>526
> 大企業はエクセル自体使わない
実に視野の狭い田舎者だなｗ 表「計算」の意味わかってる？
Excelは住所録を作るためのアプリじゃないから エクセル?
ああ、シートがオマケに付いてるVB6か
あれはプログラマー以外には使いこなせないよ
表計算?
何それ? SQLより計算速いの? データをピポッドして支店毎にデータが並んだんだけど、
大阪支店 100円
500円
東京支店 300円
群馬支店 200円
更に右に支店総合計を入れたい。(データに合計はない)
イメージは↓こんな感じ、合計ってどこで挿入したらいいの？
大阪支店 100円
500円 600円
東京支店 300円 300円
群馬支店 200円 200円 元データ空欄500円のとこに大阪支店とちゃんと入れたら集計されないかな >>540
500円のとこにも支店名入ってるので大阪のところに表示されてるんですが、支店の合計の600円300円100円がでないんです。
ピボット難しいです。もうちょっと弄くってみます。㌧ 大企業ってExcel使わないんですか？
やっぱ禁止されてるから？ 東証一部上場企業ですが、社内申請書類はほとんどExcelですけど >>525
営業事務。
納期管理にも資料作成にも使えるぜ。 >>530
中小で営業事務やってたけど事務おばちゃんのレベルが低すぎて苦労したわ。
引き継ぎなんてVLOOKUP関数覚えてもらわなきゃ進まんからな。 WindowsAPIや参照設定で外部アプリ弄れるレベルでも、使いこなせている実感は無いな。
事務員程度じゃ1/100も使えてないんじゃないか? INDEX MATCH
XLOOKUP
SUMIFS OFFSET
SUMPRODUCT
これ使えてたらどんな職業つける？ >XLOOKUP
最新版のExcel導入してもらえるような会社じゃね? >>542
社員数的には大企業だけど標準PCにExcel（つかOffice）入ってますけど？
大企業に限らずExcel禁止されてる企業なんてあるのか？ SUMPRODUCTは使える
あとはExcelでやる必要あるの？って感じ 企業がPC導入する理由の大半はExcel使うためだからな >>550
ドヤりたいのはわかるけどsumproductは重すぎるから使わない方がいいと思うぞ exactの存在を知るまでifでやってたのは良い思い出 >>555
わかりやすいもんねSUMPRODUCTって SUMPRODUCTが重いと感じたことなんて一度もないが
どんだけ低スペックのマシン使ってんだよ 3000行いくと重いけどな
1万行だと目も当てられない 員数×単価列を作った方が分析できていいんじゃないかなって思ってる offset関数使いこなせない人がsumproduct関数を推してるイメージ
重い軽いは関係ありませんみたいな そもそも手を使う理由が分からない
ずーと口だけでやってもらいたいのに
あごが疲れたとか言って
手でシコってるの
手抜きすんなと言いたい Excel使いこなせると時給どのくらいなりますか？
3000いく？ >>566
1200円ぐらい
エクセルなんてただの道具だから、それを使って何をやるかが問題だよ
エクセルを極めて儲けたいなら講師になって勉強会でも開くと良い 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
質問です
Windows7から10にアップグレードしてからオフィスがすべて起動しなくなり困ってます
お助けください >>568
この際だから365に変えよう！
素晴らしき365の世界へ！ >>566
営業事務1300円ってとこかな。なお業務はExcel以外も多彩。 >>568
office再インストールしか無い気がする
色々なバージョンが複数入ってるなら結構厳しい ありがとうございます
一応正規のやり方で無償アップグレードしました
再インストール試してみます ホーム → 貼り付け → テキスト ファイルウィザードを使用 → 区切り文字グループ内で、任意のチェックボックをデフォルトでチェック済みにしておく方法はありますか？
スペースには常時チェックが入っているのですが、コンマも常時チェック済みにしておきたいので、方法があったら教えて下さい
Windows10
Excel2010 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
質問です
例えば下記のような表で条件をいくつかの満たした中での1番頻度の多い数値と個数を排出したいです
A B C
50 1 a
38 2 b
38 2 b
35 2 b
50 1 a
50 2 a
50 3 a
B列=2 C列=b の時にA列の1番頻度の多い数値と個数を知りたいです
上記なら数値=38 個数=2 です >>578
追加で2番目多いもの、この表なら数値=35 個数=1 も出来れば教えて欲しいです >>579
毎日EXCELデータで1000個くらい更新されてその中から排出して違うEXCELデータに利用したいのです パワーピボットの集計結果について教えて下さい
年月のスライサーでフィルターをかけると表示されている値で累計値を算出します。
非表示の値も含めて算出できませんか？ >>578
ピボットで
https://imgur.com/ihvHkja
>>582
できないと思う
そもそもスライサーってそういう機能ではないかな
非表示も出したいならピボット外に数式でも作るか、ピボットを複数用意するか ピボットテーブルって365になってからもう用無しだよな >>589
F5とG5は下にオートフィル(コピペ)すれば何位でも出てくるよ
あとF2とG2は調べたい数値や文字列(1とかaとか)を入れてね >>590
>>591
了解しました
10000行くらい有り更に日付でくくる感じですね >>592
日付の列もあんの？
まぁCOUNTIFSにその列を追加するだけだけど >>591
何故か上手くいかず試しに手入力データでやってみましたがやはり上手くいきません
何がおかしいのですか？
https://i.imgur.com/gXzkU4N.jpg >>596
一番右のカッコを+の前に持ってきたらどうだろう >>596
Countifsは列指定は駄目だったはず
J1:j1000とか縦の範囲をどの検索範囲も同じ範囲で指定する >>598
>>599
普通にできるけどなぁ
365だからかもしれない
countifsの検索条件をセル参照じゃなくて手入力で2と"b"にしてみたら出来る？ >>600
すいません今やれないので後で試してみます >>600
countifsだけでやると5を返すので2とbの検索条件は見れてると思います >>600
駄目でした
8行以降を消すと出来ますが8行以降を追加すると駄目です >>603
あぁわかった
ごめん間違えた
作り直すからまっててね ごめんこんなのしか出来なかった
D1の式
=B1&C1&A1
 
E1の式
=IF(B1&C1<>$H$2&$I$2,"",IF(COUNTIF($D$1:D1,D1)>1,"",COUNTIF(D:D,D1)))
 
F1の式
=IF(E1="","",RANK.EQ(E1,E:E)+COUNTIF($E$1:E1,E1)-1)
 
I5の式
=IFERROR(INDEX(A:A,MATCH(H5,F:F,0)),"")
 
J5の式
=IF(I5="","",COUNTIFS(A:A,I5,B:B,$H$2,C:C,$I$2))
http://imgur.com/PosupHg.png 文字化けしてた
D1の式
=B1&C1&A1
E1の式
=IF(B1&C1<>$H$2&$I$2,"",IF(COUNTIF($D$1:D1,D1)>1,"",COUNTIF(D:D,D1)))
F1の式
=IF(E1="","",RANK.EQ(E1,E:E)+COUNTIF($E$1:E1,E1)-1)
I5の式
=IFERROR(INDEX(A:A,MATCH(H5,F:F,0)),"")
J5の式
=IF(I5="","",COUNTIFS(A:A,I5,B:B,$H$2,C:C,$I$2))
http://imgur.com/PosupHg.png すみません、エクセルファイルの内容を一行ずつ読み込みをして、データベースのテーブルにいれる
みたいのを考えてるんですが、改行コードはどう指定すればよいかわからず…
エクセルに改行コードってありますでしょうか？ 普通にDB側でExcelまたはcsvを読み込ませたらよくない？ 6>>610
もしかしてvbaで考えてるのか？
アクセスからインポートするだけでいいぞ
エクセルのまま何も考えずに取り込める Docmd.importspreadsheetか,配列に入れてrs.addnew ExcelでADO使えないでしょう、、、
ガセも酷いねここ お前ら質問理解できないのにイチャモンだけはつけるのか
暇なんだ 君らってExcelの関数どの程度わかってるの？
365の新関数ももちろん極めてるのよね？ どの程度って自作出来るくらいには
新関数?
知らん
XLOOKUP?
なにそれSQLより強いの? このスレにはExcel外の関数を扱うプログラマーもいる。
Excelの関数詳しい程度でマウント取ろうとしても無駄だよ。 うちは2019だから365で追加された関数はよく知らない
そろそろ365に乗り換えようかなあと思ってるところ 基本的な関数だけ知ってれば十分使えるだろ
あとは知ってれば便利なこともあるかも程度 ExcelスレなのにExcel以外を使わせようとするよねここのお馬鹿さん達って
つまりExcel知らないって事なんだよね 逆だよ
Excelだと効率が悪いって知ってるから、もっといい方法があるって書いてるだけなのに >>622
xlookupもuniqueも便利だけど、他の方法が多い＋他のPCとの兼ね合いがあってむやみに使わないようにしている プログラミング専門スレのガチ勢相手だと勝てなくて馬鹿にされるからここに来てマウントとろうとしてるんだぞ！
あんまりいじめるなよ！ Excel使いこなしてて全部Excelでできる人はやればいいと思うけど
使い方わからなくて悩んでる人がいたとき、無理にExcelでやろうとすると難しいからどうせ勉強するならAccessなり別の方法を使ったほうが圧倒的に簡単なケースがあるよという話 ぽまいらの会社のPCってAccessもインスコされてるの？ 逆だと思うが。
エクセルに詳しい奴はエクセルの中だけに閉じこもったりはしない。
詳しい奴はセールスフォースとの連携とか普通にやるだろ? 総合スレだから、例えばVBSから実行するExcelや、Excelで実行するJavascriptの話があってもいいと思うんだが、
Excelしか使えない(しかもVBA不可の)雑魚がわめいてるんだよ。 Excelでやることが目的で、何かをやるためにExcelを手段として使うわけではないんでしょ
だからExcelより適した手段があってもExcelでやらないといけない 会社のPCにエクセルしか入ってない人もいるだろうが、
それでも全部エクセルでということはない
足りない部分はフリーで使えるGASで補うとか、普通にやると思うんだけどな 会社の仕事なら、掲示板でやり方を聞くとか不適切極まりないな いきなりセールスフォースとか言い出す人って周りが見えてない人の代表者 え?
だってそれが普通だろ?
エクセル詳しいと思うならな。
違うと思うのは詳しくないからだよ。
ほんの一部の関数を覚えただけで詳しい気になってる井の中の蛙 逆にExcelに拘る柔軟さがないやつで、使いこなせてるやつがいたら見てみたいわ >>634
標準ではインストールされてないけど必要に応じてインストールできる 以前、NHKかなんかの番組で派遣か新入社員がsum関数使って計算してんのをプログラミングしててすげーって誉めちぎってたの思い出した 関数をたくさん覚えていることとExcelを使いこなしていることは同義ではないからな 関数の問題じゃなくて、それを使って何をするかが問題なんだけど、無価値な人間にはそれが理解できないんだよなあ 「Excelから使える関数」ってことかしら？
VBA経由でWinAPI32のURLDownloadToFile関数を使うとか。 訂正
誤) WinAPI32
正) Win32API URLDownloadToFileもDLに成功したら返り値0とかあったような？ >>654
WindowsAPIもセルに入る。
これでちゃんとメモ帳のハンドル返ってくるぞ。
Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Function うんこ() As Long
うんこ = FindWindow(vbNullString, "無題 - メモ帳")
End Function そういう意味では、2003あたりでも365の新関数使えるのか・・ 全部作り直して登録すればいいだけではあるけど、
そこまでの労力かけるならさっさと買ったほうが良いわけで >>650
ウチの会社（誰もが知ってる一部上場企業）では、元データをプリントアウトし、電卓弾いて各部署や取引先へ独自フォーマットへ手入力するというスキルが重要視されるからな
VBAどころかエクセル関数ですら使ったらハッカー扱いでクビだろうな >>1に入れといた方がいいんじゃない？
【5 Excel以外の使用】可・否 >>661
ACCESS可→ACCESSスレ行け
とか平気で言いそう
このスレの民度 >>661
否なら参照設定やCreateObjectすら使えないじゃんか くだらねぇ。
完全にExcelオンリー低能が僻んでるだけじゃねえか。 おまいらって財務系の関数も使うの？
あとフィールドとか 財務系は使わない
利息計算なんて年に数回も使わないから、不安すぎていつも作業列使ってシッカリ計算している
フィールドも使わない。ピボット→コピーして値貼り付け、で作成した表に作業列を付ける事が多い
頻繁に使わない物は間違える方が怖いんだよな >>643
わざとだろw
戦闘力100の雑魚を黙らせるのに、「私の戦闘力は53万です」は有効 【1 OSの種類 .】 Windows**
【2 Excelのバージョン 】 Excel**
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
Excel以外の使用不可
ピボット不可
1枚目の元データを2枚目で集計したいです
2枚目のLとMとN列と1行目を
1枚目のAとBとC列と1行目から検索して重複するデータを全て足したいです
http://imgur.com/5RHAB6j.jpg
http://imgur.com/Vw7fooq.jpg 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel365?
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
範囲指定でA1 からA100とか指定する時に使ってる分だけ指定したい
というのを関数だけで出来ますか？
A10まで使ってたらA10若しくはA11という事が分かるといいんです >>669
間に抜けがない前提のctrl+aじゃダメ？ >>669
A1選択して
ctrl+shift+end >>668
>【4 VBAでの回答の可否】 否
>Excel以外の使用不可
一応、Microsoft QueryがExcelの範囲内だから可能だけど、
VBA否じゃGROUP BYも無理だろう。
>>669
出来るけど、いちいちA1:A100ってしなくてもA:Aで十分じゃない? >>668
出来るっちゃ出来るけど、
作業列使って「A_お_!」みたいなデータを作ってピボットにしたほうが早いし見やすい
俺だったら絶対に数式ではやらんかな
https://i.imgur.com/0Ba66kJ.png
=SUMIFS(INDEX($D:$F,0,MATCH(K$1,$K$1:$M$1,0)),$A:$A,$H2,$B:$B,$I2,$C:$C,$J2) 散々クエリガー！アクセスガー！言うてるけどやっぱりここの奴らExcel全然使いこなせてないやん
牧野ってコテハンだけまともやな
画像だとスマホアプリの365やから
=SUMIFS(OFFSET(C2,,XMATCH(O1:Q1,D1:J1),COUNTA(A:A)),A2:A14,L2:L14,B2:B14,M2:M14,C2:C14,N2:N14)
牧野の回答に近いけどな 他に簡単な手段があるならExcelを使いこなす必要もない
Excel縛りで難易度上げるゲームをするのは自由だが、目的の達成に必要ではない >>677
相手の環境もわからんで文句ばっか言うて答え出ーへんやんキミキミー ─────────────────────────────
｜┌──────────┐ 履歴書 令和2年11月22日
｜｜ ／ ＼ | ┌───────────────
｜｜ ／ ＼ | ｜氏名： Kin Tamapurio
｜｜／ ==(ω)=(ω)=＼ | ├───────────────
｜｜| （__人__） | .| ｜生年月日 1947年12月20日
｜｜＼ ｀ ⌒´ ,／ .| ├───────────────
｜｜...イ.ヽヽ、___ ーーノﾞ- ､ | ｜現住所： 東京都
｜｜ | '; ＼_____ ノ.|ヽ i....｜ ├───────────────
｜｜ | ＼/ﾞ（__)＼,| i | | ｜連絡先： xxx-xxx-xxxx
｜└──────────┘ └───────────────
｜┌───┬─┬──────────────────────
｜｜ 年 ｜月｜ 受賞歴
｜├───┼─┼──────────────────────
｜｜ 1972 ｜.X.｜ベスト金玉ぷりぷり
｜├───┼─┼──────────────────────
｜｜ 1975 ｜.X.｜ベスト金玉ぷりぷり
｜├───┼─┼──────────────────────
｜｜ 1976 ｜.X.｜ベスト金玉ぷりぷり
｜├───┼─┼──────────────────────
｜｜ 1977 ｜.X.｜ベスト金玉ぷりぷり
｜├───┼─┼──────────────────────
｜｜ 1978 ｜.X.｜ベスト金玉ぷりぷり・ゴールデンボール賞
｜├───┼─┼──────────────────────
｜｜ 1980 ｜.X.｜ベスト金玉ぷりぷり・ゴールデン金☆玉賞
｜├───┼─┼──────────────────────
｜｜ ｜ ｜ 以 上 >>676
使いこなせるからそんなクソ長い関数は使わず簡単なSQLでやるんだが・・。
長い式書くほうが凄いと勘違いしてる? >>684
SQLのほうが拡張性あるしな
ちょっと修正とか流用しようとしたときに、Excelだとほぼ作り直しと同等の作業が発生することが多い >670,>671,>673,>674
あざっす家じゃ試せないので火曜に試します >>684
いやいや日本語すら読めへんようになったんか？ >>682
これガセなのか？
調べてもガセって出て来ないんだが >>677
世の中にはどれだけ大変でも、決してエクセル以外使おうとしない人がいる
人助け＋練習と思って答えてあげるといいんじゃないかな
>>682>691
ガセじゃなくて本当に動いた
もちろん死ぬほどめんどくさい
このページの説明が分かりやすい
https://papasensei365.com/excel-nonvba-3d-maze/#toc3 Excel以外使えない環境があるのに世の中にはそれを絶対に認めない人もいる >>687
ExcelなんだからSQL使えるに決まってるだろ。
何で使えないと思った? どうせあれだろ。
MSクエリは別ウィンドウで開くから、エクセルには含まれないとか言うんだろ? もはやただ屁理屈こねてるだけじゃん
ここでレスバトルして勝ったところで糞の役にも立たないぞ Excelの標準機能でも、Index&Matchや高速Vlookupみたいな、ちょっとでも裏技っぽいのは全部Excel外なんだろ、低能どもにとっては
要は、馬鹿でもわかるように答えろってごねてるんだよ 結局質問者が何もわかってないから難しいことしなくて済む答えよこせってだけのことでしょ VBA不可だって、私は全く分かりませんという意味なのか、使ってはいけない環境ですという意味なのかで回答内容が変わるからな 質問の意味は、今上司に変なExcelの表を作らされてます。助けて下さい。
答えは、上司にAccess教えてやれ。 >>704
ronin使ってもIDスレ立てられなかったって前スレあたりで見た 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2010
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 可
マクロ初心者です。
このような形で氏名のは入っている行に新規登録を追加していきたいと考えております。
ここまでは表示することができましたが、.Range("4:4")の次の値をSetする際にどうしてもうまくできません。
ご教授をお願いします。
Sub 検索()
With Worksheets("30年（当月）")
Dim noRng As Range
Dim nameRng As Range
Dim namelRng As Range
Set noRng = .Range("4:4").Find(what:=.Range("番号").Value, lookat:=xlWhole)
Set nameRng = .Range("4:4").Find(what:=.Range("氏名").Value, lookat:=xlWhole)
Set namelRng = Range("i15").End(xlDown)
Cells(namelRng.Row + 1, nameRng.Column) = "新規氏名"
Cells(namelRng.Row + 1, noRng.Column) = "新規番号"
End With
End Sub >>704
無いほうがいいだろ
世の中にはIDを使い分けられる人もいるんだよ 普通に回線切り替えればいいだけだし
ワッチョイもUA偽装できるし
情弱が同じIDワッチョイ晒し続けるというだけで全く意味のない設定 ワッチョイとかidスレ立てようかと話題になると絶対に湧いてくるワッチョイやidは自演対策にならないレス
困るのは荒らしてる人だけだし影響なくね >>707
そのブックあげてくれないと何をやってるのか分からないというか、分かっても超面倒くさい。 検索を30年（当月）のシートで実行して動くのなら、Cellsの前に.がないのが原因 >>707
基本的なコードは間違っていない。
findで返ってくるのはrangeだからそのままset出来る。
考えられる原因はWithとか検索したものが見つかってないとかその辺りだと思う
見つからなかった時の分岐を先に用意したほうが良いかもしれない
ActiveCell.Cells(2, 3) = "bbb"
Set a = ActiveSheet.Range("a1:d10").Find(what:="bbb")
Debug.Print a.Row
後は>>711の通りブックあげてくれんと無理ゲー あと、この板はどうやってもIDもワッチョイも付けられない
運営に頼むしか無いけど動きは超遅い だからつける意味ねーって
ついてようがなかろうがみんな書き込む内容は同じだし
他人の書き込みが制御できないことより、自分の気に食わない書き込みをスルー出来ないことのほうが問題だと早く気づいて 質問してもまともな答えを書く人がほとんどいない
たまーにコピペして反応を楽しむ動物園みたいに利用してるわ 毎スレ思うけど何故IDないんだ？
スレ立ての時に手を抜くなよ
10秒あればできるだろ？
Come om! 牧野って奴が思い込みで言ってるだけだよ
選択肢を自分で潰していくタイプ
組織の足を引っ張る存在 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel 365
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 否
ショートカットキーについて質問です。
Alt+PageDownで右に1画面分スクロールはできるのですが、逆にAlt+PageUpで左にはできません。
別のPCでも同様です。
皆さんの環境ではできるでしょうか。
できない原因に思い当たることがあれば教えて下さい。 >>726
ちなみにExcelのバージョンを教えていただけないでしょうか。 >>725
office365だけど出来るぞ
思い当たる原因といってもキーが物理的に壊れているかノートならnumlockか何か
>>722>>724
5chの設定内容
https://info.5ch.net/index.php/SETTING.TXT
この板の設定
https://mevius.5ch.net/bsoft/SETTING.TXT
NO_IDってとこ >>728
確かにキーボードの問題のようです。
スマホからのリモートデスクトップ経由であればできました。
ノートではないですが、ノートのようなキー配列のキーボードで、PgUpはFnと↑を一緒に押すタイプです。
Ctrlキー、Fnキー、↑キーどれも機能しているのですが、この3つの組み合わせだと機能しないようです。 >>729
Nキーオーバーロールだっけ？
キーボードによって、同時押しした時の最大数が決まっている。その制限に引っかかっている、でほぼ間違いないだろう
別キーボードを買うのが一番早い解決策と思う >>730
逆のCtrl+Fn+↓は問題ないんですがね。
長年使っているキーボードですが、他のキー3つ同時押しでも機能しなかったことはないです。
組み合わせによるのですかね。 >>731
あっそうか、ｽﾏﾝ。Nキー関係無いわ
テキトーなソフトで、エクセル以外で同時押しできているかどうかを確認
https://www.vector.co.jp/soft/dl/win95/util/se488546.html
エクセル以外で同時押しできている→エクセルに何か原因がある
エクセル以外で同時押しできていない→キーボードの問題っぽい
って感じかね 組み合わせなのか、そもそもPgUpが死んでるのか
後者ならブラウザでPgUp押して上にスクロールされるか見れば簡単にわかる >>729, >>731
訂正です。
×Ctrl
〇Alt
>>732
そちらのソフトで確認してみました。
Alt+PgDnは反応しましたが、Alt+PgUpは反応しませんでした。
多分そんなに使うショートカットキーでもないと思うので諦めます。
ありがとうございました。 >>733
AltなしのPgUpは機能しています。 エクセルのバグ見つけたことあるんだけど、そういうときどこにいえばいいの？ https://i.imgur.com/wfEJgE0.jpg
スプレッドシートなんですが、sum関数を最終行まで適用させたい場合はどういう設定をすればいいんでしょうか？
右下をつまんでいくのでは、面倒です(´・ω・`)、、、 >>738
・コピー（ctrl+C）
・ctrl+shift＋↓キー
・貼り付け（ctrl+V） >>740
一番下から適当に上にフィルして上の行番号だけを手打ちで変える >>739
それ用のfor関数などがあるのではないのでしょうか？ 隣のセルとかに値が入ってるなら、セル右下の▲をダブルクリック >737
もしかして・・・
A列が常に更新されるなら
B1に
=SUM(a:a)
で終わるって話だったりします？ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2019
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q1014793185
=COUNT(INDEX(1/(MATCH($A$1:$A$20,A1:A20,0)=ROW(A1:A20)),))
このような事をしたくて調べてたんですが、
MATCHの引数の一つ目を配列にするとどんな処理が行われる事になるのでしょうか？
また、このイコールは代入演算子ですか？
うまく動かずに0とか出てしまいます。
スカラー値を求められてるところに配列値を渡すと、先頭だけが渡されるのではないのですか？
それともこの書き方だとループ処理みたいに配列の先頭から順に検査値として使われるのでしょうか？ >>745
あなた人のこと馬鹿にしてるんですか？
さすがにそんなわけないでしょう >>747
そう感じたなら申し訳ありません
私はありとあらゆる解決策をかたぱしから提示するだけの人形なのです >746
第一引数についてはあまり詳しく書いていない
https://docs.microsoft.com/ja-jp/office/vba/api/excel.worksheetfunction.match
今試しただけなので、具体的なことは言えない。が、恐らく配列定数的な処理になってるキはする
https://i.imgur.com/IqCTXsT.png
恐らくこれは関数を作った人のおまけやオプション程度だとおもうので、基本的には使わない方が良いと思う 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel for Microsoft 365 MSO(16.0.13231.20348)64bit
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
仕事で2台のデスクトップPCを使用しています、1台を新しく買い替えたためofficeをダウンロードしてインストールしました。
新PCのエクセルで結合セルを含むソート(並べ変え)ができなくなって困っています
A1～G30の範囲で各行のE列とF列が結合されています
この状態でソートをかけると「この操作を行うには、すべての結合セルを同じサイズにする必要があります。」とエラーになります
古いPCのエクセル（ Excel for Microsoft 365 MSO(16.0.12527.21096)64bit）では問題なくソート(並べ変え)はできます。
これはパソコンが原因なのか、エクセルが原因なのか、分かる方がいらっしゃれば教えてください
また、office365で前のバージョンをインストールする方法があれば、教えていただきたいです
よろしくお願いします。 >>750
詳細なバージョン番号は個人を特定できるので書かないほうがいいです
16で十分 >>749
ありがとうございます。
配列数式というのが何とかわかってきました。
プログラミングのfor構文のような事をできる便利なものですね。
ところでexcel2019win10では配列数式の結果をどこかに入力させる事はできないんでしょうか？
先頭だけ表示するのではなくて、10個の配列を返してくれるならそれを10個のセルに自動で入れるとか。
変数機能が2019ではない？みたいなので。
1,2,3,4,5,5,6,8,8
配列数式がこのような配列を返してくる時に、値の変化が何回あるか調べたいのです。
1個前の値と比べて異なるなら1を返すような事にしてSUMに渡したいのです。
A1:A9に上記の数値が入ってるのであれば
{=SUM(IF(A1:A8<>A2:A9,1,0))}みたいにして6？を導き出したいのです VBAでやればいいでしょ
それか一度セルに入れてもう一度判定
何で一発でやろうとするかな >>753
まんまスピルって機能があるが・・・
配列数式
https://i.imgur.com/gXrXQyJ.png
indexは引数により、配列を返す事ができる
https://i.imgur.com/rWFGlRv.png
vbaか作業列にしたほうがいいと思う
indexとoffsetで実現できるとおもうけど、普通にしんどい。俺はギブアップ もし数式でやるなら、空白がある時と0の時に気をつける必要があると思う VBAで簡単にできることをExcel本体の機能だけでやろうとするドMが多いよなここ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 可
A1:B5に数字が入ってたり入っていない表があり、
「最低値がA列にあるかB列にあるか」を判定する式として、
=IF(MIN(A1:B5)=MIN(A1:A5),"A列に最小があるよ","B列に最小があるよ")
という式を作りました。
(最小値がA列とB列両方にある時は"A列に最小があるよ"でとりあえず構いません)
しかし、
「A列に数字が一つも入っていない」かつ「B列の最小値が0である」時、
「Aにはデータが入っていないが、数値的には0である」という判定になっているのか、
「A列に最小があるよ」という間違った(?)判定がでてしまいます。
この「A列にデータが入っていないときに数値的に0である」ことを避けることは可能でしょうか。 ANDでCOUNTBLANKを入れればいいんじゃないか >>759
2016ならIFS関数かSWITCH関数が使えるから便利だよ >>759
MINの引数の中身が空っぽにならなければいいのかな
=IF(MIN(A1:B5)=MIN(A1:A5,1E+307),"A列に最小があるよ","B列に最小があるよ")
=IF(MIN(A1:B5)=MIN(A1:A5,MAX(A1:B5)+1),"A列に最小があるよ","B列に最小があるよ") 未だにいるんだなこんなクソ回答する奴
>>760
＞ANDでCOUNTBLANKを入れればいいんじゃないか テーブルのスライサーの項目選択を変更したときに、VBAで該当のスライサーの名前を取得する
シンプルな方法があれば教えてください。
現状スライサーは4つ使用して、worksheetのcalculationイベントでVBAを動作させています。値変更時に再計算が無いスライサーが一つあって困っています。 >>牧野さんありがとうございます。
空白を詰める作業からということで、
{=INDEX(A:A,SMALL(IF(A:A<>"",ROW(A:A)),ROW()))}
こういうのを見つけてどの関数がどの役割してるのか勉強してて
{=SMALL(IF(A:A<>"",ROW(A:A)),ROW())}
B列にこれを入れていったら不思議な事になりました。
空白,1,2,3,空白のようにA1:A5の時に
B1とB2で式が全く同じなのに答えが違うのです。
{=SMALL(IF(A$1:A$5<>"",ROW(A$1:A$5)),ROW())}
気になってこれでもやってみましたら、やはりB1:B5に変える値が異なっているのです。
機能的にはそうでなくては困るのですが、これはなぜなのでしょう？
B1セルに入力したときとB2セルに入力したときでは同じ数式なのに別の事が行われてるのですか？ >>766は機能自体を勘違いしていました。
IFで作られた空白行を除く行番号配列を
ROW()を隣の列に配置する事で小さい順に取り出してるだけなんですね。
だから置かれてるセルが違えば結果も変わるわけですね。
IF(A:A<>"",ROW(A:A))
一つきになってるのはこれで作られる配列にFALSEは入らないのですか？
TEXTJOINでどんな配列か確かめたら、空白行の部分にはFALSEが入っていました。
IF(A:A<>"",ROW(A:A),"")
こうすることでTEXTJOINの第二引数次第で空白行を無視出来ましたが
SMALL関数はFALSEを受け取らずに配列として認識しているのですか？ 試しに
=SMALL({1,2,FALSE,4,5},3)
このようにしてみたら「4」が出力されました。
=SMALL({1,2,"",4,5},3)
でも同じでした。
関数によってFALSEを配列の要素数カウントする場合としない場合があるのでしょうか？ ?
条件とは?
牧野史からの回答以外は見ないようにします。 2019を使ってます
以前のバージョンのExcelファイルを使用しているからかこういう表示が毎回出ます
毎回うざいので出なくする設定があれば教えてください
http://imepic.jp/20201109/465270 >>771
おまえがうざいので出なくなる設定があれば教えてください みんなは365でスピルって使ってる？
VBAで書くより1つのセルに式を書くだけの方が楽な場合があるんだがスピルってどーなの？ >>746>>768
詳細載ってなかった
https://support.microsoft.com/ja-jp/office/small-%E9%96%A2%E6%95%B0-17da8222-7c82-42b2-961b-14c45384df07
色々試してみたけど、単純に「数値以外は無視する」って条件でランク付していると思う
booleanも1や0になったりはせず、TRUEやFALSEそのまま対象外になるっぽい
「あ」「'100」、また書式設定が文字列になっていても無視される。もちろんスペースも文字列なので無視。空白は長さ0の文字列扱いなので無視と思う
>>771
見れない
>>774
使ってない
使いこなせば便利そうだけど、他の入力済みセルに激突するのが腹立つ
多分使っていくウチにこういうの無くなるんだろうけど スピルかなり便利だと思ってるんだけど、
ここの人達には受け入れられないんだろうな。
UNIQUE(SORT(FILTER(～
とか便利 >>759
私が>>64なんだが
他人の質問を再度貼ってなにがしたいの？
回答者に無駄な労力がかかるからやめろ 教えてほしいんだけど
100個の数字が100行にわたって存在していて、その100個の中からどれかとどれかを足し合わせると55になる組み合わせをすべて抽出したりってEXCELでできないの？ あともうひとつ教えてほしいんだけど、ピボットテーブルで出してる金額の数値にカンマをつけたら付くときと付かないときがあるんだけど違いは何なの？ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
countifs使いたいと思ったんですが条件にa2,b1とか入れられない？で困ってます
で関数の文字列を作る関数を作ろうと思ったら「″」これが邪魔で作れません
犬と雄とか手打ちで入れない方法教えて下さい
○雄雌オカマLGBT…
犬
猫
熊
： >>783
数式の縦か横のアドレス選択してF4押せば幸せになれそう 質問に質問で返しちゃいけない理由なんてない
せいぜいがジョジョのキャラがそう言ってたからぐらいだ 【1 OSの種類 .】 MAC MOJAVE
【2 Excelのバージョン 】 Excel**16.43
【3 VBAが使えるか .】 はい･いいえ
【4 VBAでの回答の可否】 否
MacBookトラックパッドで指2本でのズームができないです。
Ctrl+マウスでは可能でした。
また他のエクセルファイル、新規ファイルでトラックパッドでズームできました。
なぜか急にできなくなるのですがこれはバグですか？
該当ファイル開き直しましたが改善せず。。 >>796
自己解決プラグインのカレンダーがこっそりと起動したままで終了したらいけました 【1 OSの種類 .】 Windows 10
【2 Excelのバージョン 】 Excel 2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
具体的な操作についてではないのですが、詳しい皆さんに相談です
2016より2019のが欠陥あるとか、2016の方が使い勝手が良いとかそういうことはありますか？
会社でPCを購入して業者にOFFICEのインストールまでを依頼したんだけど、買ったのは2019版なのに2016が入ってて…
業者の言い分は、ダウングレードを事前に伝えなかったのは悪かったけどMicrosoftがそれを認めてるだか推奨してるのと、(業者の)作業時間の短縮のためだったと言うんですが、当然ながら契約通りの納入してないだろって社内で問題になってまして >>798
普通に突っ返して2019版入れて持って来いって言えばいいだけやん
時間的な問題とかあるなら調達部門に交渉させて支払額の減額とかさせればいい >>799
>>800
納品については仰る通りだからまた後日話し合いなんだけど(とは言え2019にするなら別途作業費用かかるとか言いやがったよ)、ホントにMicrosoftが2016推奨云々って話があるの？というのと、実際使ってて違うみたいなことあるんだろうかと思った次第よ >>798
多分インストーラーの方式が原因かな
2016だとインストーラーから一括インストール出来るし修正ファイルを個別に当てられる
2019からはインストール用ファイルからネットに落としに行く形式しか使えなくなってて
アップデートも最新に更新するしかない
管理するなら2016のほうが楽だよ
2016と2019は中身は一緒
買ったのライセンスだよね？
2019ライセンスはそれ以下のバージョンのどれ入れても問題ないって奴
ただそうやるって伝えないで作業したのは糞もいいところ >>801
2016推奨なんて話はない
しかしオフィスのインストール程度を業者に依頼って金あるんだな
契約不履行で違約金取って出禁にすればいいよ それと組織アカウントの設定とかちゃんと業務から移行してパスワード変更、何台認証されてるか確認しときなよ
前に会社に入れるついでに自分のパソコンにも入れたアホが逮捕されたニュースあったから
〇/50でインストール台数確認できる >>802
>>804
レスありがとうライセンス版です買ったものと違うっていう契約不履行の面は事実として、最新の2019使うのが後々にもいいものなのか、実際もう使い始めてるの止めるのも面倒だしなぁとか困ってしまってね
うち小さい組織でシステム専門の社員とかもいないんだよね
そこまで詳しい人もいないわ人手もないわで、PCだけ買って後で全部インストールやらメール使えるようするやらにしても誰がいつやれる？って感じだから、その分金かかるけど設定まで頼んでるんだわ…情弱ってなめられてるんだろうな >>801
そりゃ違いはあるよ
ただ普通に使ってて致命的な違いがあるわけじゃないしそもそもいま何を使ってるのか知らんけどそう言う違いも知らずに2019版を発注したのか？
業者が追加の作業費用がかかると言うなら大変ですね、でも頑張ってくださいねって言えばいいだけだろw >>804
企業ならインストール作業までやって納品とかよくあるよ
オフィスだけじゃなくてウィルス対策ソフトとか監視ソフトとかもセットでインストールしてもらう >>806
もう使い始めてるって検収とかしないの？
もしそうならそりゃ舐められて当然としか言えないが… >>806
まあそこにお金きちんとかけられるのはいいことだよ
導入PCでぼったくり富士通とか入れられてないといいけど
>>808
キッティング1台10万とかするからねえ
うちは俺がやって代わりにその分PCをSSDにした
専用システム入れなくちゃいけないPCでしか依頼しない 【1 OSの種類 .】 Windows 10
【2 Excelのバージョン 】 Excel 2013
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
10gから15gまで 200円
16gから20gまで 300円
21gから30gまで 400円
↑のような、重量と送料についての表があります。
別シートのあるセルに表示された重量の横のセルに、送料を表示させたいです。
VLOOKUPのようにこの表を参照したいのですが、範囲内かどうかを探すというのがわかりません。
参照先の表の、「○gから」と「○gまで」を別の列にするのは可能です。
何かいい方法はないでしょうか？ >>810
> キッティング1台10万とかするからねえ
よほど特殊なことしない限り10万/台はそれこそボッタクリだと思うが…
> うちは俺がやって代わりにその分PCをSSDにした
一人でやれるような台数ならそれでいいかもな >>816
ここで聞くのは間違いです
ここは大喜利スレです >>812
13ｇなら10ｇから20ｇまでって入力用の表に入れれば? >>812
以上、以下、未満のところは少し工夫しないといけないけど、vlookup関数の第4引数をtrueにするか、lookup関数でいけると思います。 >>826
だから、いけるかどうかじゃなくて、やり方を書いてくださいよ
いけるんならいってみてください
なんでそういうもったいぶった言い方するんですか
適当なこと言ってるだけなら黙っててください >>827
答えられるやつなんてこのスレには居ないぞ？
何か勘違いしてないかい？ スクショでいいので見せてください。
>>826
＞>>812
＞以上、以下、未満のところは少し工夫しないといけないけど、vlookup関数の第4引数をtrueにするか、lookup関数でいけると思います。 やってないんだから見せられるわけないだろ
おまえがやれ >>798
普通にありえない。
向こうが単純に作業を間違えただけ。色々言い訳して押し通そうとしているだけ
ただ、2016も2019もサポート期間は変わらないから実はそこまで重症でもない
恐らく2019で無ければどうにもならないって場面も無いと思う
（が、保険で自分の分ぐらいは2019に再インストールしておいた方が良い）
俺なら「上は着払いで送って無料で2019にしろと言っているが俺がめんどくさいので2016だといくら割引になるか見積もり速攻で出せ」
かな >>812
vlookup関数の第4引数を1かtrueにするとn未満で検索ができる
https://i.imgur.com/jK0qoaI.png 種類が2,3種類ならifで繋いで足してもいいけどめんどくさかったので辞めたほうが良いと思う うーん、ちょっとやりたいことと違うなあ
まあいいです、ありがとうございました 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel365
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 否
Excelに限らずMicrosoft Office全般なのですが、2010→365にしてから、例えばExcelが既に開かれている状態でExcelのファイルをエクスプローラーから開くときに、一向に開かれない事が結構な頻度であります。
そういう場合、Excel内で矢印キーでカレントセルを移動するなり、Alt+Tabでウィンドウを切り替える等すれば開かれますが、そういった操作をしないと延々と開かれません。
アプリケーションのリボンタブのファイル→開くは使用していないので、この方法でも上記現象が起こるかどうかは確認していません。
別の全てのPCでも同じです。
皆さんの環境ではどうかと、原因がわかれば教えて下さい。 >>838
セルへ入力中に別ファイルを開こうとしても、
入力を確定させるかESCなどでキャンセルしないと開くことは出来ない
2010でも365でも同じ >>839
セルに入力中ではなく、Excelに限ったことではないので、原因はそれではありません。 >>840
マクロ入ならウィルス対策ソフトが止めてるかも。一度切ってみる
サーバー上にあるファイルならネットワークの状態を確認 >>840
Excelに限ったことではないならここで相談すべき案件ではない やめてください！
それがわからないから皆さんに聞いているわけです。
くだらない暇つぶし、やめたら？ それが他人にものを教えていただこうとする人のとる態度ですか？ 「エクセル 開かない 」
で検索すると山程対処法が載ってるので試してみて
ここに書くには量が多すぎてﾑﾘ 山ほどあったらどれが正しいかわからないじゃないですか。
だから正しいのはどれか聞いているのですよ。
役に立たないならわざわざレスしなくていいです。 840で「Excelに限ったことではない」
843で「Excelでしか起きない」
なんなの？ 大した問題じゃないし対策もあるんだから気にしなければいいだけ
別に困ってないだろ？ >>838
それWindows10の場合でしょ
スマホとかほかのOSからExcel使ったらそうならないでしょ
だったらExcelの問題じゃないから、Windowsスレで質問すべき内容 スマホでExcelは使いませんのでわかりませんし、参考になりません。
ただ全てのPCで起きてますから普遍的な問題です。
またこれはExcelの問題です。セルから移動すると直るってかなり条件が限定されているので。
引き続き、理解ある人の回答を待ちます。 当方win10excel2019ですが、配列数式の中でOR関数が使えない事にショックを受けて
調べたら
論理式 + 論理式
とプラス記号ですればOR関数
論理式 * 論理式
とすればAND関数が配列数式の中でも使えるとのこと。
公式サイトではないところからの情報を頼りに実行してみたら成功しました。
これはまぐれの成功ですか？正式にこういう使い方をこの先にしていっても問題は起きませんか？
また、2016やさらに過去のexcelでも同じようにIFの論理式に+や*を使う事は推奨されますでしょうか？ >>856
TRUE=1、FALSE=0
FALSE*FALSE=FALSE
TRUE*FALSE=FALSE
TRUE*TRUE=TRUE
これはANDになってるから常に正しい
FALSE+FALSE=FALSE
TRUE+FALSE=TRUE
TRUE+TRUE=2
論理式がともにTRUEのとき2になるが、これをTRUEと解釈するのならORになる >>856
合ってる
+がor
*がand
てかこんなのもわからんのか今のこのスレの奴らは >>858
感謝です。
>>859
1以上であれば真なのでは？
漠然とそんな風に思ってきました。
2を真ではないとするケースもあるのでしょうか？ =5:5 a:aで交差するa5 の値が出るけれどこの計算式って何か有効な使いみちあります
indirectと併用するぐらい? >>861
エクセルは0以外がTRUE
ただ、プログラム言語によって変わる事があるので微妙に要注意
>>862
重なってる部分の合計を取りたい時に使えると思って早10年、まだその機会がない
多分一生使わない
空白が演算子って事を知っていればそれだけで良いと思う ここはExcel以外のソフトやプログラミング言語を自慢するスレなのでExcelの質問はしないで下さい 馬鹿しかいないスレなのでもう誰も質問しないでいいよ 床屋談義の長老のごとく、生暖かく見守ってやれっつーの 0以外がtrueなので
(-1 + 1) = 0
(true + true) = false
論理型の無い言語で if (a == true) する奴は勇者 https://i.imgur.com/tou0zyN.jpg
各々の食品に重さの係数をかけ、重さあたりの栄養素量にしたいです。1を100gとし、0.1は10gです。
対象としたい栄養価はkcalとproteinだけでなく数十あるので、これを手入力するのは大変です。
一括で重さをかける関数はないでしょうか？
ちなみにスプレッドシート民です(´・ω・`) >>871
Sheet2のA1に=Sheet1!A1*係数と入れて、必要な範囲をコピー 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 否
在庫表を作ろうとしています
項目は【日付】、【品名】、【在庫数】、【入出庫】、【数量】、【残】の6つです
このうち、品名と入出庫はプルダウンで選択します（品名は10種類、入出庫は「入庫」と「出庫」）
数量は手入力です
①【品名】を選択すると現在の【在庫数】が自動で表示される
②【残】は入出庫の別と【数量】を判断して【在庫数】から増減して自動表示
③後日、前回と同じ【品名】が選択された場合は前回の【残】が今回の【在庫数】として表示される
やりたいのはこれだけなのですが、別シートに在庫一覧を作って累計入庫数と累計出庫数から【在庫数】を表示させると、以前の日付の【在庫数】も変わってしまい正確な履歴が残りません
履歴を含めて常に正確な【在庫数】を表示させる方法はないでしょうか >>877
合戦というか、SUMPRODUCTアレルギーの人がそんなもん使ってる人はレベルが低いだの頭がおかしいだのと一方的に批判する データベースを使う、などと言うと、Excelを使いこなすべき厨が登場する >>878
在庫数の項目はもたない
入出庫で足し算引き算して計算を繰り返す
きょうの在庫数を出したいときはSUM
ある日付のときの在庫数を出したいときはsumifsで日付をフィルターする
というのは データベースを使う意義ってありますかね？
ないよねこの場合？ >>882
なるほど、日付のフィルターですか
ちょっと調べてみます どうせ似たようないろんな問題が出てくるから、SQLで処理するようにしたほうがあとで楽 SUMIFSで当日までの累計入出庫数を計算して初期在庫にプラスすることで在庫数を表示させることはできないだろうか
日付と品名の両方にフィルターをかけるのが面倒臭そうだけど >>882
個人的にはそれあまり薦めない
在庫数入力エリア作った上で自動計算とのチェック式のほうがいいと思う
自動計算だと在庫が計算式で動いちゃうから合わなかった時にどの時点でいくつあったのか、が確認出来ない そうしておけば自分しかそのファイルメンテできなくなるので、仕事がなくならないんですよ。 >>882
日付のフィルターでなんとかなりそうです
ありがとうございました 先日教えていただいた日付でのフィルターを調べてみました
A1【日付】、B1【品名】、C1【出庫数】、D1【残数】
A2の10月1日がスタートで、A30が12月4日の入力当日とします
特定の【品名】の【残数】を計算する式は、=SUMIFS(C:C,B:B,@B:B,A:A,">="&$A$2,A:A,"<="&A30)
になると思いますが、同日に同じ品名のものを複数回出庫すると、それぞれの行の残数が同じになってしまいます
そこで「自身の行より上」を計算する式にしようと思い、ADDRESS、COLUMN、ROWなどを調べてみたのですがよく理解できません
同一品を同日に複数回出庫してもそれぞれ正確な残数が出る式を教えてください
よろしくお願いいたします 訂正
>>892のSUMIFSの式は「当日までの累計出庫数」でした
最初はこれを元に残数を計算しようとしました 「自身の行より上の累計出庫数」を計算する式を教えていただければ幸いです >>895
使えそうですね
ありがとうございます
これで試行錯誤してみます 既存のファイルに並び替え等の作業をしてたんですが、
小まめに上書き保存をしていたにも関わらず、
1日放置した現在、手を加える前に戻っていました。
電源が落ちる、フリーズ、再起動などのトラブルはありません。
1) こういう事って起こり得るのでしょうか？
であれば、原因を教えて下さい
2) 小まめな上書きは確実なので、『○月○日○時』時点の保存データを
吸い出す方法があれば、教えて下さい
なお、『ファイル』→『情報』→『ブックの管理』には
データが残っておりませんでした
宜しくお願い致します >>897
誰かが古いファイルで上書きした。
ふざけた回答だと思うか?
ウチの会社で起こった実話だ。 >>898
>>899
どうも。
『あり得ない』ということでしょうか？
自分もずっと思ってはいます。
心当たりは途中でusbでデータ移動したことで、
書き込む前はPC外のデータ探ししてました。
usb自体には元データしか残ってません。
『あり得ない』なら、誰かの悪意か、
自分が精神科行くかしか無いのですが。 >>900
心当たりどころかそれが原因
エクセルは一時ファイルって物を作ってそこで作業する
USBメモリを抜くとその一時ファイルを見失う
その後はUSBファイルを戻しても、場所を指定して保存などを行っても、正しく保存出来ないことがある。
ただし保存できることもあるのが厄介
以下の手順がNG
・USBのファイルを開く
・USBを外す
・場所を指定して保存orUSBを戻して上書き 1) こういう事って起こり得るのでしょうか？
であれば、原因を教えて下さい
起こり得ます
現に起こっているでしょう
原因はお前
2) 小まめな上書きは確実なので、『○月○日○時』時点の保存データを
吸い出す方法があれば、教えて下さい
なお、『ファイル』→『情報』→『ブックの管理』には
データが残っておりませんでした
上書きしてんだから吸い出せるわけないだろ またExcelは上書きしても履歴が遡れる機能がざります。 ご回答ありがとうございました
データは手入力で済ませました
以降、慎重に行います 【1 OSの種類 .】 Windows7
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
エクセルで月ごとのカレンダーを作っています。
よくある壁掛けのカレンダーと同じ↓な感じです
.
A列 B C D .E . F G
２行目 日 月 火 水 木 金 土
３行目 .31 １ ２ .３ ４ ５ ６
４行目 .７
ここで当月ではない前月の31や月末の次月はフォントを小さくしたいです。
.
A1に2021/1/1、D1に1月（=Month(A1)）が入っていて
カレンダーは3行目から８行目まで日付の数字が入ります。
条件付き書式では
=Month(A3)=Month(D1)-1 の時フォントサイズ11
というようにしたいのですが、上手くいきません。ご教示願えますでしょうか。
作ってみたもの↓
Sub fontsize()
If Month(Rows("3:8")) = Cells(1, 4) Then
With Target.Font
.Size = 11
End With
Else
With Target.Font
.Size = 16
End With
End If
End Sub >>911
全然試してないけど
=Month(A3)=Month(D1)-1 の
ではなく
=Month(A3)=(Month(D1)-1)
でどうかな
あと、「エクセル カレンダー」で検索すると死ぬほど出てくると思うからそういうのを流用したほうが良いと思う あとこれだと12月か1月でおかしくなると思うからmod()を挟んだ法が良いと思う https://www.kingjim.co.jp/download/tepra/spc10_api/
ここで配布しているサンプルが動かない。Declareステートメントに、PtrSafe属性を設定
まではできた。そこからexeファイルを見つけられない。ディレクトリは合っているのに。 >>915
>>915
そこのサンプルはOSの種類を判定する部分にバグがある
直す方法は色々あるけど、とりあえず動かすだけならexeの場所を固定してやればいい
この部分でexeの場所を指定してるから、Ifを無視して必ずProgram Files (x86)になるように書き換える
'-----------------------------------------------------------------------------
' SPC10のEXEファイルをパス付きで指定する
'-----------------------------------------------------------------------------
If IsWow64() Then
' OSが64ビット環境
strExePathName = "C:\Program Files (x86)\KING JIM\TEPRA SPC10\SPC10.exe"
Else
' OSが32ビット環境
strExePathName = "C:\Program Files\KING JIM\TEPRA SPC10\SPC10.exe"
End If 6年前に公開されたサンプルか
64bit対応もめっちゃ中途半端だし、直せる人がいないのか
まあ需要もないんだろうな >>911
targetって、なんでしょう？
変数宣言してない変数？ >>918
参考にしたものを弄ったのですが、確かに変数宣言がないですね（汗）
確かtargetでrows（3：8）としたけど動かなかったので消したと思います >>919
その元々のヤツって、イベントプロシージャでしょう。
それをそのまま使っても動かないですよ。
そもそもどこタイミングで、フォントサイズを小さくしたいのかとか、きちんと決めてますか？
カレンダー作成のタイミングなのか、一度作ってからボタンを押したら変更するのとか。 office personal2019と３６５どっちがいいですか？
3万円出して皆さん買ってます？ 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
B2:X11に一番上の行に数字が番号順に入り、その下のセルには値、文字列の入った表があります。
A1に8、A2に寿司と入れたときに
2行目を横へ8を検索し、さらに8の見つかった列を今度は縦に寿司を検索、
見つかったセルを書式設定で赤く枠付けしたいんですが
どう数式を作れば良いですか？ VBA使えるならForとIfで8を見つけてさらにForとIfで寿司を見つけてセルの書式設定すればいいんじゃないの B3:X11に条件付き書式で=IF(B3=$A$2,B$2=$A$1) >>921
買い切りの2019でいんじゃない？
俺も金無かった頃はずーーーっと2003使ってた
収入上がる頃には365の快適さを取るようになると思う。多分 >>916
ありがとうございます。テプラ本体がないとソフトウェアのインストールも出来ないので、
自宅では試せませんでした。
Declare Ptrsafeを追加して64ビットに対応させました。
Wow64() Then
> ' OSが64ビット環境
> strExePathName = "C:\Program Files (x86)\KING JIM\TEPRA SPC10\SPC10.exe"
と変更するということでしょうか？
> >>915
> >>915
> そこのサンプルはOSの種類を判定する部分にバグがある
> 直す方法は色々あるけど、とりあえず動かすだけならexeの場所を固定してやればいい
> この部分でexeの場所を指定してるから、Ifを無視して必ずProgram Files (x86)になるように書き換える
>
> '-----------------------------------------------------------------------------
> ' SPC10のEXEファイルをパス付きで指定する
> '-----------------------------------------------------------------------------
> If IsWow64() Then
> ' OSが64ビット環境
> strExePathName = "C:\Program Files (x86)\KING JIM\TEPRA SPC10\SPC10.exe"
> Else
> ' OSが32ビット環境
> strExePathName = "C:\Program Files\KING JIM\TEPRA SPC10\SPC10.exe"
> End If よろしくお願いいたします。
【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2013
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
A2からQ100まで、たくさんの関数が書かれています。
これらの関数は、元はセルA1とセルB1の値を計算のはじまりにしていて、
ある関数の結果が、また別のセルの関数の計算元になっていて、
最終的な集計がC1に出るようになっています。
あるVBAで、セルA1とセルB2値を設定し、たくさんの関数の結果（C1の値）を取得するコードを書きたいです。
でも、各関数の計算が複雑なので、C1に結果が出てくるには時間がかかる可能性があります。これを待つコードって
書くことはできるんでしょうか？
つまり
・A1とB2に値を書く
・全関数の計算結果が出るまで待つ
・C1の値を取得する
という流れコードを書きたいのです。この2番目をどう書けばよいでしょうか？ >>929
Calculateが再計算だけど、
エクセルの再計算はブックが重すぎると途中で終わったりそのままコードが進む場合があるので
再計算中かどうかをループで判定する必要がある
Application.Calculate
If Not Application.CalculationState = xlDone Then
DoEvents
End If エクセル初心者です
例えば100を基準値に設定して、A1に10、A2に20…、A10に100と自動入力させるのはどの関数を利用すれば良いでしょうか
A1とA2にあらかじめ10、20と入力しておいてそれを基に自動入力する以外で方法は無いでしょうか >>932
B1=100(基準値)
A1=B1*0.1
A2=B1*0.2
A10=B1 >>933
なるほどできました ありがとうございました 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
. 好 良
1 〇 〇 エリーゼ
2 〇 ソフトせんべい
3 アルフォート
4 〇 〇 ごはん
5 〇 モモ肉
6 〇 野菜
という表があるとして、
〇がつけられている数字と右の項目を
上からジグザグ順に(1好→1良→2好→2良→3好→3良・・・)抜きだしたいのですが、
と
(例)
1 エリーゼ
1 エリーゼ
2 ソフトせんべい
4 ごはん
4 ごはん
5 田中
6 マルエツ
適切な関数を教えていただきたいです。 あれ、出力したい結果の項目が入れ替わってました
5の行は「モモ肉」で
6の行は「野菜」で大丈夫です(っд`) >【3 VBAが使えるか .】 はい
>【4 VBAでの回答の可否】 可
>適切な関数を教えていただきたいです。
ユーザー定義関数一択 適切なって書いてあるだろ。
関数で無理矢理作るのが適切か? >>936
こんな感じ
https://dotup.org/uploda/dotup.org2331660.xlsx.html
>>940
わからない
私はまず保守が最小限になることを重視し、その上で入出力が最小限になるような回答をしています
・>>936が突然いなくなっても、他の人が見ても改良しやすいよう
・メールでファイルを送る時、マクロ無しでも送れるよう
なるだけマクロを使わず、できるだけ平たく回答することを心がけています >>940
関数知らないアピールはいいから
このスレ関数知らないアピールする奴多すぎるな 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel365
【3 VBAが使えるか .】 はい
【4 VBAでの回答の可否】 可
掛け算九九表のようなマトリックス表を作りたいです
とにかく速く正確な表の作り方を教えて下さい
http://imgur.com/pNOx75w.jpg >>943
普通に、複合参照で乗算の数式を入力してコピーじゃダメなの？ >>936
VBA使えるなら簡単にできるだろ
>>943
VBA使えるなら簡単にできるだろ >>943
A1:I9
=ROW()*COLUMN() なんでみんな365を使ってるんですか？office2019を使ってる人が全く居ない >>941
扱いが簡単な数式で作っていただいて
助かります。
これを元に、目的としたものが作れそうです。
ありがとうございました。
>>945
質問が「関数(数式？)ではとてつもなくめんどくさい式になってしまう場合」だったときの
回答者様側の負担を減らすための
一応の保険として、
VBAはありにさせてもらいました。
Excelで言う「関数」って一般的にVBAマクロのことも含むのでしょうか？
それでしたら私の聞き方の問題でしたので申し訳ないです。 【1 OSの種類 .】 Windows10
【2 Excelのバージョン 】 Excel2016
【3 VBAが使えるか .】 いいえ
【4 VBAでの回答の可否】 可
電話番号のデータ変換について
+81*********のような国際表記データをハイフン付きで03-****-****のような日本表記に変えたいのですが
① 先頭の+81を0に変える
② ハイフンを入れ並び方を 2桁 - 4桁 - 4桁にする
できれば関数だけでできる方法を教えて下さい。
よろしくお願いします。 >>950
substitute(番号のセル、“+081”、0)
と
text(変換後のセル、“00-0000-0000”)
を組み合わせる >>945
どうやりますか？
>>943の回答お願いします！ >>944
だめ
遅いです
>>946
まだ遅いです
>>951
遅いです すみませんが人に物を聞く態度とは思えませんので無視させていだだきます。 >>953
Sub a()
For i = 2 To 10
For j = 2 To 10
Cells(i, j) = Cells(i, 1) * Cells(1, j)
Next
Next
End Sub >>943
この質問への回答でこのスレのレベルが分かるな >>943
質問が抽象的すぎる
「～のような」「とにかく速く」じゃなくて、表の大きさや実行時間などを数字で示すか、何と比較して遅いのか書け 人間よりはやく作成したいです。
あとパターンも無限に。 パソコンを操作するのは人間じゃないのか
それをどうやって越えるんだか >>961
ExcelもPCも無限は扱えない、よって不可能
終了 >>949
含まないよ
>>961
=INT(RAND()*10)
のような事？ >>947
2019はマイクロソフトアカウントと紐付けないといけないから
情報がMSに監視されているとおもわれ >>962
まともに会話できてない時点で質問者が論外 >>949
使ってる大半の人はVBAが関数だとは知らない。
一般に広く知られていないので、そういう意味では含まない。
しかし、fxをクリックして関数の挿入をすると、関数の分類にユーザー定義と出てくるので、
Excelの仕様としてVBAは関数ということで間違いない。 自分が使うかどうか、どう使うかが問題なのであって、
それが分類上関数であろうがなかろうがどうでもいい話 >>947
2010と2019って全く変化がないんよ
それで365に流れてるんよ >>971
それではB2しか求まりませんよね
一つ一つやっていたら全然速くないので不採用です >>947
ビジネスは365
個人使用はスプレッドシート
2019買うやつはアホ
それだけ こんなスレ見るよりオフィス田中でも見てた方がよっぽどいいからな 一応言っておくが、
関数を問われて「ユーザー定義関数でできるよ」とか答えちゃう人間とか、
VBAでできるよ、とかしか書いてない奴は
役にたってないどころか
邪魔になってるから回答側に回らんでくれるかね >>978
関数わかる人いないんだよこのスレには
オフィス田中見たほうがいいって >>978
関数で答えてほしいならVBAの回答可否を不可にすべきだろ >>991
もともと回答者の質が低いのに何言ってんだ？ このスレッドは１０００を超えました。
新しいスレッドを立ててください。
life time: 67日 15時間 53分 8秒 5ちゃんねるの運営はプレミアム会員の皆さまに支えられています。
運営にご協力お願いいたします。
───────────────────
《プレミアム会員の主な特典》
★ 5ちゃんねる専用ブラウザからの広告除去
★ 5ちゃんねるの過去ログを取得
★ 書き込み規制の緩和
───────────────────
会員登録には個人情報は一切必要ありません。
月300円から匿名でご購入いただけます。
▼ プレミアム会員登録はこちら ▼
https://premium.5ch.net/
▼ 浪人ログインはこちら ▼
https://login.5ch.net/login.php レス数が1000を超えています。これ以上書き込みはできません。
