Excel総合相談所 134 - 暇つぶし2ch

Excel総合相談所 134 at BSOFT

[前50を表示]
150:名無しさん＠そうだ選挙にいこう
19/03/01 18:12:34.51 .net
やっぱ書式でしょう

151:名無しさん＠そうだ選挙にいこう
19/03/01 18:19:02.04 .net
あとで計算に使わないならお手軽にTEXT関数でもいけるんじゃないの
=TEXT(B1-A1,"+0.00;-0.00;±0")
パーセント表示のとこの実際の値がどうなってるかわかんないけど

152:名無しさん＠そうだ選挙にいこう
19/03/01 21:50:13.83 .net
Multiplanが染みついているので、余程でないとただのLOOKUPしか使わない。

153:名無しさん＠そうだ選挙にいこう
19/03/02 07:47:56.35 .net
vlookupはエポカルクで覚えた。

154:名無しさん＠そうだ選挙にいこう
19/03/02 10:48:47.55 .net
文字列IDの最小値を取りたいのだけど、できなくて。お知恵を貸してください。
やりたいことは、ID列の先頭文字でカテゴリしてその中の最小値を取る！です。
以下の0始まりだと、「001001」を取りたい
ID列
001001　※取得
001002
100001
100002
200001
200002
最大は、TEXT(MAX(INDEX((LEFT($A$2:$A$7,1)=TEXT(0,"0"))*$A$2:$A$7,0)),"000000")みたいなので取れたんだけど。最小は上のやり方だと0始まり以外の配列要素が0になってしまって、0が取れてしまう。
マクロでやれば簡単なんだけど、計算式でやりたいっす。

155:名無しさん＠そうだ選挙にいこう
19/03/02 12:04:04.22 .net
>>154
0&"000000"で無理やり1桁増やすとか

156:名無しさん＠そうだ選挙にいこう
19/03/02 12:50:37.04 .net
なんとなくけど、"-"を付与してminで取れば行けそうな気がするんだけど0も-0になってるみたいで無理だった
=MIN(INDEX((LEFT("-"&$A$2:$A$700,2)=TEXT(0,"-0"))*$A$2:$A$700,0))

157:名無しさん＠そうだ選挙にいこう
19/03/02 12:51:30.65 .net
違うわ、>>156は多分失敗してる

158:名無しさん＠そうだ選挙にいこう
19/03/02 13:33:45.23 .net
>>154
作業列使い単純に数値化してMINじゃいかんの？
意味がよく判らん

159:名無しさん＠そうだ選挙にいこう
19/03/02 13:47:58.62 .net
フォームボタンクリックで、あるシートを表示するVBAを書きました。
ただ非表示シートを表示させるだけじゃなくて、
そのときの条件で、シート内の文言やラジオボタンたちの表示/非表示が違うので、
if **** then *****.visible = true みたいなことをずっと書いてあります。
しかし、命令通りに非表示/表示がされないことがあります。非表示のはずのボタンが
出ていたり、その逆があったり。
これは、処理スピードのために、命令全体を、
application.EnableEvents = false　　後はtrue
application.ScreenUpdating = false　　後はtrue
application.Calculation = xlCalculationManual　　後はxlCalculationAutomatic
で挟んだせいだと思います。
ですので、いちばん最後に、「いったん表示をリフレッシュ」みたいな命令を出せばいいんじゃないかと
思うのですが、そういう命令ってありますでしょうか？

160:名無しさん＠そうだ選挙にいこう
19/03/02 13:49:54.95 .net
>>154
配列数式。
=MIN(IF(IF((LEFT(A2:A5,1)="0"),A2:A5,FALSE)*1=0,FALSE,A2:A5*1))
URLﾘﾝｸ(imgur.com)
falseと文字列の評価を同時にするとどうしてもfalseが0になるので、ネストにするしかなかった
他に方法はあるかもシレンが、もういいや
色々こね回して一時間掛かったけど楽しかったぞ
 >>158
マクロ使えるぐらいだし、作業列使わない方法を効いてるんだろう
これは実務じゃなくて半分遊びだな

161:名無しさん＠そうだ選挙にいこう
19/03/02 13:59:06.14 .net
>>159
vbaにリフレッシュ無いっぽい
＞そのときの条件
これが再計算や描画が影響するものなら高速化を外したほうが良いと思う
言うてもそんなに変わらんでしょ

162:名無しさん＠そうだ選挙にいこう
19/03/02 14:29:28.32 .net
>>161
それが、かなりスピードが違うんです。10倍近く。

163:名無しさん＠そうだ選挙にいこう
19/03/02 14:42:43.43 .net
コード見ないとわからないな
ちなみに何秒ぐらい変わるの？頻度は1日何回ぐらい？
10倍はどうでもいいぞ

164:名無しさん＠そうだ選挙にいこう
19/03/02 14:45:37.50 .net
>>163
使用頻度は1日100回くらい。
10秒以上かかってるのが1秒になる。
せっかちな社員が使うから、
速くしておかないと「使えない奴」と思われるからまずい。

165:名無しさん＠そうだ選挙にいこう
19/03/02 15:00:11.43 .net
シートを日数分追加したいのですが
31日分だったら31枚プラス集計の1枚といったかんじで
超絶面倒なのですが何かいい方法はありますでしょうか？
シートに日付も入れられるとすげー楽です。

166:名無しさん＠そうだ選挙にいこう
19/03/02 15:09:28.79 .net
エクセルを使ったことがない初心者です。
ウィンドウズ10にエクセルソフトを入れたいのですが何を購入したらいいですか？
それから勉強もしたいのでお勧めの本とかありますか？

167:名無しさん＠そうだ選挙にいこう
19/03/02 15:18:03.63 .net
>>164
うーん微妙だね
10秒ぐらいなら待ってもらえばいいと思うけど
これ以上はコード見ないと分からない。恐らく構成が変なのだろう
アップしてくれれば見るよ
 >>165
Sub foo()
日数 = Day(DateSerial(Year(Date), Month(Date) + 1, 0))
For i = 1 To 日数
Set 新シート = Worksheets.Add(, Worksheets(Worksheets.Count))
新シート.Name = i & "日"
Next
End Sub
>>166
機能は制限されるけど、オフィスオンラインなら無料
URLﾘﾝｸ(products.office.com)
googleSpreadsheetも無料
URLﾘﾝｸ(www.google.com)
本はMOS試験の本でも買っておくと良い

168:165
19/03/02 15:25:05.24 .net
>>167
ありがとう！

169:名無しさん＠そうだ選挙にいこう
19/03/02 15:34:27.66 .net
ありがとうございます。

170:165
19/03/02 15:38:35.48 .net
ぶぉ、スプレッドシートはVBAいけないんだｗ
まぁ当たり前か。
jsでかくのかぁ・・・

171:名無しさん＠そうだ選挙にいこう
19/03/02 15:40:47.57 .net
本は超図解シリーズだべ

172:名無しさん＠そうだ選挙にいこう
19/03/02 17:19:20.89 .net
なんでマイクロソフトはマクロ含むブックは
拡張子わけるようにしたわけ？いらんくね？

173:名無しさん＠そうだ選挙にいこう
19/03/02 17:33:28.70 .net
>>172
分ける必要はある
一緒だとウィルスが危険すぎる

174:名無しさん＠そうだ選挙にいこう
19/03/02 17:33:40.82 .net
ウィルスみたいなマクロだ

175:名無しさん＠そうだ選挙にいこう
19/03/02 19:48:28.72 .net
>>160　
ありがとう！できたよ。
その他みんなもありがとう。
いろんな方法があったのだけど、MAXは簡単に実現できたのに
MINができなくて、計算式一発でやれる方法を模索をしてました。
ワーク列使ったり、マクロ使ったりすれば、実現できてはいたんだけど。
ありがとう！！

176:名無しさん＠そうだ選挙にいこう
19/03/02 22:33:19.88 .net
【1 OSの種類　　　　 .】 Windows10
【2 Excelのバージョン　】 Excel2016
【3 VBAが使えるか　　 .】はい
【4 VBAでの回答の可否】可
下記の画像のような表があるとして、どこかのセルに5と入力するとC列の9と10の平均の値を表示させるということは可能でしょうか？

URLﾘﾝｸ(i.imgur.com)

177:名無しさん＠そうだ選挙にいこう
19/03/02 23:14:55.87 .net
>>176
C列全体なら8.5と思うが、
7.5と5はどこから来たんだい

178:名無しさん＠そうだ選挙にいこう
19/03/02 23:32:18.20 .net
>>177
数字間違えてました。
9と10ではなく7と8です。
B列で5と入力されている行のC列の値を平均してセルに出力したい、ということです。
分かりづらくて申し訳ないです…

179:名無しさん＠そうだ選挙にいこう
19/03/03 00:04:54.26 .net
>>178
=SUMPRODUCT((B:B=F3)*(C:C))/COUNTIF(B:B,F3)

180:名無しさん＠そうだ選挙にいこう
19/03/03 00:10:25.42 .net
>>176 素人考えだけどe列に5を入れてどこかに平均出すセル作るとかなら
=AVERAGE(C1:indirect("c"&MATCH(5,E:E)))とか？

181:名無しさん＠そうだ選挙にいこう
19/03/03 00:32:34.11 .net
>>178
=AVERAGEIF(B:B,F3,C:C)

182:名無しさん＠そうだ選挙にいこう
19/03/03 00:36:39.41 .net
>181
あーそんなんあったな、初めて見たｗ

183:名無しさん＠そうだ選挙にいこう
19/03/03 00:39:49.55 .net
>>181
これでできました！
皆様ご尽力ありがとうございました！

184:名無しさん＠そうだ選挙にいこう
19/03/03 01:20:26.16 .net
エクセル作成の依頼をする場合どこがいいの？

185:名無しさん＠そうだ選挙にいこう
19/03/03 01:26:48.47 .net
ここでもいいしソーシャルワーキングで検索してランサーズとかに頼んでも良い

186:名無しさん＠そうだ選挙にいこう
19/03/03 01:33:58.73 .net
ここでもいいの？

187:名無しさん＠そうだ選挙にいこう
19/03/03 02:10:17.21 .net
>>186
ここで大まかな仕様を説明してから捨てアドで詳細決めれば良いじゃん

188:名無しさん＠そうだ選挙にいこう
19/03/03 03:21:50.18 .net
流石にお金払うレベルのものは、ここではやってくれないと思うぞ
軽く依頼するつもりでも、フタを開けてみると
依頼できるレベルに仕様がはっきりまとまっていない・・・なんて事もよくあるから
 >>187 の言うように、詳細詰めるのはここで相談するのはアリだと思うけど

189:名無しさん＠そうだ選挙にいこう
19/03/03 06:46:10.17 .net
>>186
3年くらい前ここで依頼された事あった
尼ギフト券で2万貰った

190:名無しさん＠そうだ選挙にいこう
19/03/03 08:16:54.40 .net
捨てアドで直接やりとりしてその後お礼を渡すのなら可能なのかな？
まぁブッチされても知らんが

191:名無しさん＠そうだ選挙にいこう
19/03/03 08:44:29.66 .net
189だけど
依頼主みずから前払いしてきたよ

192:sage
19/03/03 11:36:23.08 .net
▼━質問テンプレ (出来れば使ってね) ━━
【1 OSの種類　　　　 .】 Windows7
【2 Excelのバージョン　】 Excel2010
【3 VBAが使えるか　　 .】はい
【4 VBAでの回答の可否】可
入力フォーム上に設けられたテキストボックスの行数制限を行おうとしています。
下記のコードで対応しましたが、なぜかmsgboxの"行数は～"が何度も表示され、do loopがうまくいってない気がします。
どこが間違っているのでしょうか？
If TextBox1.LineCount > 4 Then
MsgBox "行数は4行までに制限されています"
Do Until TextBox1.LineCount = 4
TextBox1.Value = Left(TextBox1.Value, Len(TextBox1.Value) - 2)
Loop
End If

193:名無しさん＠そうだ選挙にいこう
19/03/03 11:54:45.28 .net
>>192
コード、かなり変だよ
使うのはdoloopじゃない
Private Sub TextBox1_Change()
If TextBox1.LineCount > 4 Then
MsgBox "行数は4行までに制限されています"
行テキスト = Split(TextBox1.Text, vbCrLf)
TextBox1.Text = 行テキスト(0) & vbCrLf & 行テキスト(1) & vbCrLf & 行テキスト(2) & vbCrLf & 行テキスト(3)
End If
End Sub

194:名無しさん＠そうだ選挙にいこう
19/03/03 13:07:22.16 .net
>>184-191
とっとと死ねゴミクズ

195:名無しさん＠そうだ選挙にいこう
19/03/03 13:12:34.04 .net
>>193
だけど言い忘れてた
テキストボックスをダブルクリックするとprivaet～が表示されるからそこに突っ込む

196:名無しさん＠そうだ選挙にいこう
19/03/03 15:55:19.09 .net
>>173
拡張子でわけなくてもいいじゃん

197:sage
19/03/03 16:30:03.85 .net
>>193
splitのようなものがあるのですね…初見でした
アドバイスありがとうございました

198:名無しさん＠そうだ選挙にいこう
19/03/04 18:54:02.58 .net
求人サイトでよく書かれている「エクセルが使えるかた」の基準って何でしょうか？
使える関数は、
SUM、AVERAGE、IF、INDEX、MATCH、RANK、
LARGE、SMALL、LEFT、MID、RIGHT、OFFSET、
IFERROR、TEXT、SUBSTITUTE、MAX、MIN、
COUNT、COUNTIF、SUMIF、SUMPRODUCT
くらいです。
グラフは条件付き書式のデータバーやスパークラインくらいならできますが、
円グラフとかは全くできません。
マクロは実操作でアクションを覚えさせるのはできますがVBAのプログラミングは全くできません。
ビポットテーブルも全く分かりません。
「エクセルが使えるかた」に入りますか？

199:名無しさん＠そうだ選挙にいこう
19/03/04 19:10:28.88 .net
>>198
微妙だけどグラフが勿体無いな
グラフだけ作れたらそう言っていいと思う。なんか知らんけど日本人はグラフ好きなんで
関数は十分
個人的にはindirectがほしいけど、offset使えるならまぁいいかな
後は書いてないけどandとorか、まぁ使えると思うけど
＞グラフは条件付き書式のデータバーやスパークラインくらいならできますが、
＞円グラフとかは全くできません。
とりあえず最低限グラフ作れるだけの技能は必要
といっても、表を選択して、挿入のグラフを選択するだけなので数秒でできる
ってか今練習して使えるようになれば良い。1分もあれば覚えるだろう
それと欲しいのは、グラフエリアの軸の書式設定は変えれるようになっておいたほうが良い。要は左端の数字の最小・最大・メモリの幅など
まぁそんだけできたら良い
後はそこら中を右クリックしまくって、なんとなく何をどう変えられるかを掴んでおくと大体どうにかなると思う
例として、10秒で作ったグラフ
URLﾘﾝｸ(i.imgur.com)
＞マクロは実操作でアクションを覚えさせるのはできますがVBAのプログラミングは全くできません。
勿体無いな。恐らくマクロは触らされないとは思うが、もうちょっと覚えた方が後々良い
マクロは業務を全自動にできるので、君が退職した後も仕事を減らし続けることができる
俺は五人分ぐらい働いたぞ
時給は上がらんかったがな、ははは
＞ビポットテーブルも全く分かりません。
これもグラフ同様覚えておいたほうが良い

200:名無しさん＠そうだ選挙にいこう
19/03/04 19:15:42.64 .net
アイコンダブルクリックしてExcel起動、数値を入力したあとΣボタン押して合計を求め、ブックに名前を付けて保存
こんだけできれば「Excelできます」と言っていい
そんな職場も実在する
できないやつってのは、こんな基礎もとことんできないから

201:名無しさん＠そうだ選挙にいこう
19/03/04 23:54:22.30 .net
>>198
データ処理をメインとする俺からすると少し足りないかな
if使うならis系の関数(isnumber, iserror, iseven他)便利なもの多いから覚えたほうがいい
他にもmatch, indirect + address, row, columnが理解できれば本当にできないことがないってくらい何でもできる

202:名無しさん＠そうだ選挙にいこう
19/03/04 23:56:57.98 .net
Σボタンって何の事かわからんかった
多分10年以上押して無いけど、これってみんな使うの？

203:名無しさん＠そうだ選挙にいこう
19/03/05 05:46:56.42 .net
>>202
個人的にはほぼ使わないけど知らないのは流石にヤバイレベル

204:名無しさん＠そうだ選挙にいこう
19/03/05 05:53:01.15 .net
>>198
エクセル使える人に入る入らないという定義自体がもうどうでもいい感じだけど、入るとも言えるし入らないとも言える
でも「入らない」と言いたくなる、何故なら
・ピボットできないの厳しい
・円、棒、折れ線グラフ作れないの？
↑どれも範囲選択してポチっでボタン押すだけ、あとは微調整やら
普通の本が読める人ならやる気さえあれば15分ずつで解決する
それをやるかやらないかだけの話で、あとは正直に実務ではやったことないけど自己学習でやったことあると言えるかどうかなんでは？
あとIFERRORでVlookupのネスト(必要な数いくらでも)くらいはできて欲しいし、TRIM,LENあたりのデータ整える時必要ないのもできて欲しい
ピボットは、数字見る時話しながらショートカットでピボット作って、なんてことあるからそこでまごついているのってと思ってしまう

205:名無しさん＠そうだ選挙にいこう
19/03/05 12:35:19.14 .net
>>198
自己申告だろうから
そのくらいなら自信もって使えますと言えばいい

206:名無しさん＠そうだ選挙にいこう
19/03/05 12:39:58.36 .net
>>198みたいな具体性ない書き方は、大概大したスキルを求められてない
本当に高レベル求めるなら必要レベルの資格を書いてあるよ

207:名無しさん＠そうだ選挙にいこう
19/03/05 13:35:31.60 .net
>>220
使わないとならないボタンでもないので、
また使わなくても手間がすごく増えるわけでもない
でも、使い始めたら結構つかうようになったよ。

208:名無しさん＠そうだ選挙にいこう
19/03/05 15:49:15.06 .net
おせっかい機能がひどすぎて、小文字の「i」が入力できない。

209:名無しさん＠そうだ選挙にいこう
19/03/05 18:07:27.49 .net
SHIFT押しながら7押して文字列を入力すれば関係なくなるような

210:名無しさん＠そうだ選挙にいこう
19/03/05 22:11:41.52 .net
>>82
xlsxファイルの実態はzipファイルだしね。

211:名無しさん＠そうだ選挙にいこう
19/03/05 22:23:43.95 .net
エクセルなんて利用者がめちゃくちゃいるから
わからないことなんてネット検索ですぐわかるようになる

212:名無しさん＠そうだ選挙にいこう
19/03/05 22:45:43.02 .net
>>209
シングルコーテーションでしょ
あれってスペルチェック効かなくなるの？切ってるからよく知らんけど

213:名無しさん＠そうだ選挙にいこう
19/03/06 14:13:57.35 .net
教えてください。
むちゃくちゃな編集を禁止するためにシートを保護しても、一部のセルだけは
「ロック」というところのチェックをはずしておけば、編集可能になりますが、
条件付き書式で、「編集可能＝ロックされていない」セルだけは自動で背景色が変わると
いう設定にすることはできないのでしょうか？

214:名無しさん＠そうだ選挙にいこう
19/03/06 16:45:26.63 .net
できない

215:名無しさん＠そうだ選挙にいこう
19/03/06 17:42:40.84 .net
無理矢理なら、作業列にロックの場合1とか入れて、そちらを参照

216:名無しさん＠そうだ選挙にいこう
19/03/06 18:14:43.44 .net
>>213
条件付き書式の設定
[次の数式を満たす場合に値を書式設定]
=NOT(CELL("protect",A1))

217:名無しさん＠そうだ選挙にいこう
19/03/06 18:56:54.48 .net
凄い、これは勉強になった
無いと思ってたわ

218:名無しさん＠そうだ選挙にいこう
19/03/06 22:15:56.68 .net
>>216
これnot関数って付ける必要ある？

219:名無しさん＠そうだ選挙にいこう
19/03/06 23:02:18.28 .net
>>213
要件が
編集可能＝ロックされて「いない」
なので

220:名無しさん＠そうだ選挙にいこう
19/03/06 23:05:02.68 .net
▼━質問テンプレ (出来れば使ってね) ━━
【1 OSの種類　　　　 .】 Windows7
【2 Excelのバージョン　】 Excel2010
【3 VBAが使えるか　　 .】はい
【4 VBAでの回答の可否】可
以前から悩んでいることではあるのですが、ブック間の行の移動(カット&ペースト)がうまく処理できません。
今開いているブックの３行目をデスクトップのブックを開いて４行目位にコピーしたいとき
シンプルに書きたいのですが・・・・
Workbooks.Open Filename:="C:\Users\testman\Desktop\Book1.xlsm"
Rows(3).Cut
Workbooks("book1.xlsm").Worksheets("sheet1").Rows(4).Paste
Application.CutCopyMode = False
では、ダメなんでしょうか？
結局エラーがたくさん出て、最終的には各ブックやシートをアクティブにするといったことをやって１０行近くのコードになるのが・・・
シンプルな方法はないのでしょうか？

221:名無しさん＠そうだ選挙にいこう
19/03/06 23:41:14.48 .net
213が言っている内容すらわからない。

222:名無しさん＠そうだ選挙にいこう
19/03/07 04:05:59.29 .net
>>220
Openすると、自動的に後で開いた方のブックがアクティブになるので、CutはOpenの前にしなきゃいけない
とりあえず行数を減らしたいだけなら、これでも一応動く
もっと大量のデータをコピペしたいなら、もう少し工夫が必要
Rows(3).Cut
Workbooks.Open Filename:="C:\Users\testman\Desktop\Book1.xlsm"
ActiveSheet.Rows(4).PasteSpecial

223:名無しさん＠そうだ選挙にいこう
19/03/07 05:27:47.95 .net
かねがね疑問だったんだけど、
>>216みたいなときに、A1って書くの、なんかへんじゃね？
別途「このルールの適応範囲」を指定するわけだし、別にA1関係なくね？
これのせいで混乱するんだけど。
これ、「仮にA1ってことで、条件と書式を指定しておきますね」としておいて、
他の箇所で「この条件付き書式を適応するのは○○ですよ。A1関係ないですからね」って言ってる、
そういう理解でいいの？

224:名無しさん＠そうだ選挙にいこう
19/03/07 06:43:15.04 .net
>>223
だめ、A1の保護状態でB1の書式変えたりすることあるから

225:名無しさん＠そうだ選挙にいこう
19/03/07 07:29:56.93 .net
>>223
相対参照か絶対参照かで判断すればいいんじゃないかな

226:名無しさん＠そうだ選挙にいこう
19/03/07 09:23:58.42 .net
ラウンドダウン使って報告値計算シート作ったら、上司にブラックボックスを使うなとボツにされた

ブラック・・・ボックス・・・？

227:名無しさん＠そうだ選挙にいこう
19/03/07 09:33:43.36 .net
光のない世界

228:名無しさん＠そうだ選挙にいこう
19/03/07 10:24:03.11 .net
>>226
スレチ
無能上司の下で働いてる事は同情するけど

229:名無しさん＠そうだ選挙にいこう
19/03/07 12:18:57.08 .net
コメントで何をやっているか書いておけば大概解決する
何をやっているかわかれば、普通の人は細かいことを気にしないよ

230:名無しさん＠そうだ選挙にいこう
19/03/07 12:59:06.48 .net
コメント付けると無能上司はバカにされたと思って逆ギレしかねないから
将来メンテの時に自分が忘れてしまうので付けたって事にしとけ

231:名無しさん＠そうだ選挙にいこう
19/03/07 14:29:58.98 .net
thisworkbook.Sheets("日報").Range("C4:C50").SpecialCells(xlCellTypeConstants).ClearContents
↑
これ、C4とかに値が入っている状態だと問題ないんだけど、
いちど値をクリアしてから実行すると、「該当するセルが見つかりません」って出てくる。
エクセルが、「クリアしようと思ったらもうクリアされてるじゃん。エラー出しとこ」と言ってるみたい。
そういうもんなの？

232:名無しさん＠そうだ選挙にいこう
19/03/07 14:50:03.35 .net
>>231
そういうもんらしい
URLﾘﾝｸ(docs.microsoft.com)
＞指定された条件を満たしているすべてのセル ( Range オブジェクト) を返します。
条件を満たすセルがないってエラーのようだ
あんまいらんエラーだな

233:名無しさん＠そうだ選挙にいこう
19/03/07 16:50:13.45 .net
>>232
やっぱりそうでしたか。
ありがとうございました。
そうやってすぐに的確な資料を見つけて調べられるところ、頭がよさそうでうらやましい。

234:名無しさん＠そうだ選挙にいこう
19/03/07 17:43:00.32 .net
>>233
ってか、「MSDN　調べたい内容」で検索してmsdnで調べればいいだけだよ
しっかり読めば最も正しい答えが書いてある（たまに間違えている）
ブログとかしょーもないサイトは見なくて良い

235:名無しさん＠そうだ選挙にいこう
19/03/07 18:42:54.17 .net
よくわからんが
thisworkbook.Sheets("日報").Range("C4:C50").ClearContents
ではだめなのか？

236:はてな
19/03/07 21:10:30.12 .net
【1 OSの種類　　　　 .】 Windows7
【2 Excelのバージョン　】 Excel2013
【3 VBAが使えるか　　 .】少しだけ
【4 VBAでの回答の可否】　できれば使わないでほしい。
特定の番号を入れた時に数字が増えるようにしたい。
　　A列　 B列
1行　AS　18001
2行　ZX　18001
3行　AS　18002
4行　AD 18001
5行　ZX　18001
6行　AS　18003
このようにASが増えたらその分＋1する、ほかのA列に入れた英字も入れた分だけ＋1する
ように設定したい。前に＋1した数字は変えず、増えた分変更するのはA列に文字が入力された時だけ。
そんな関数ってあるでしょうか。一枚のシートで運用したいと思っている。

237:名無しさん＠そうだ選挙にいこう
19/03/07 22:47:39.94 .net
>>236
法則がよくわからない
2行目と5行目にZXがあるのに、5行目が18002にならないのはどういうルール？

238:はてな
19/03/07 22:53:50.56 .net
>>237
ごめんなさい、打ち間違えてました。
正しくはこうです。初めてA列に入力した文字のB列が18001になり、
再度A列に同じ文字が入力されたらB列に18002と＋1されてゆくようにしたいです。
　　A列　 B列
1行　AS　18001
2行　ZX　18001
3行　AS　18002
4行　AD 　18001
5行　ZX　18002
6行　AS　18003

239:名無しさん＠そうだ選挙にいこう
19/03/07 23:00:24.29 .net
>>238
B1=18000+COUNTIF($A$1:A1,A1)
B2以下にB1の式をコピペ

240:名無しさん＠そうだ選挙にいこう
19/03/07 23:11:08.66 .net
あー単純にその手があったか
sumifしてプラス1を考えてたよ

241:名無しさん＠そうだ選挙にいこう
19/03/07 23:11:29.89 .net
おっと　maxifだった

242:はてな
19/03/07 23:13:59.88 .net
>>239
ありがとう！
こんなに簡単なんやね。
行を飛ばしてもうまくいってる。
自分一人じゃ思いつかなったかも。
本当に助かるよ。

243:名無しさん＠そうだ選挙にいこう
19/03/08 22:07:19.47 .net
パソコンなら簡単にできるけど
タブレットとかでスプレッドなどをつかったとき
マウスでないから表作成とか簡単にできてたことがやり方がわからなくなる
範囲をのばして１２３４５にしたりとか
どうやってますか？

244:名無しさん＠そうだ選挙にいこう
19/03/08 23:08:42.71 .net
>>243
スマホやタブレットは当たり判定が広く作ってあるから慣れるしかない
あと、たいがいのAndroid機器はマウスもキーボードも使えるよ
USBかBluetooth接続で普通に操作できる

245:名無しさん＠そうだ選挙にいこう
19/03/09 10:02:46.88 .net
【1 OSの種類　　　　 .】 Windows10
【2 Excelのバージョン　】 Excel2013
【3 VBAが使えるか　　 .】少しだけ
【4 VBAでの回答の可否】　できれば使わないでほしい。
見積書を表で作って、署名+捺印(陰影を図形で)してあります。
このままだと捺印部分がコピーできたり移動できたりするのですが
表と捺印を固定するため、グループ化できないでしょうか？

246:名無しさん＠そうだ選挙にいこう
19/03/09 10:42:32.40 .net
>>245
図形を動かないようにするには、シートの保護 → 許可する項目の中の「オブジェクトの編集」のチェックを外すのが定番
見積書の日付や項目を編集するには、シートを保護したままセルのロックを解除しておく

247:名無しさん＠そうだ選挙にいこう
19/03/09 10:59:06.78 .net
>>246
ありがとうございます。
「オブジェクトの編集」はチェックが外れていたのですが
パスワードを入れてみたらできました！

248:名無しさん＠そうだ選挙にいこう
19/03/09 13:35:27.53 .net
>>244
それつかわないで
どうやっておなじことをしてます？
右クリックはどうやるのすまほで

249:名無しさん＠そうだ選挙にいこう
19/03/09 14:05:52.89 .net
【1 OSの種類　　　　 .】 WindowsXP
【2 Excelのバージョン　】 Excel2003
2007以降の拡張子（XLSXなど）を開きたくて
開けずに困っています。
まだ「互換パック」がマイクロソフトのサイト
からダウンロードできるからそれを実行して
みたところ、「何も影響しない」とか表示が
出て、まったく使えない様子です。
ちなみに、２０１８年４月以降、サポートが
されなくなった、との情報もあります。
これってもう機能しないものを配信している？
できたって人いますか？？？

250:名無しさん＠そうだ選挙にいこう
19/03/09 14:26:10.98 .net
詳しくは、EXCEL2003 SP3です。

251:名無しさん＠そうだ選挙にいこう
19/03/09 14:34:37.55 .net
>>248
画面を長押しすると右クリックメニューが出る

252:名無しさん＠そうだ選挙にいこう
19/03/09 14:35:20.49 .net
>>249
開けるかどうかはブックの内容次第なので、だめなら別の方法を考えるしかない

253:名無しさん＠そうだ選挙にいこう
19/03/09 14:37:40.77 .net
>>251
ＰＣのマウスでやってる操作は全部できるようになってるのもしかして？

254:名無しさん＠そうだ選挙にいこう
19/03/09 15:04:29.68 .net
>>253
できない操作もあったはず
そういうのはメニューから選ぶしかない

255:名無しさん＠そうだ選挙にいこう
19/03/09 16:22:55.95 .net
>>252レス感謝します。
内容次第では開けるものもあるはずということですね。
試してみます。

256:名無しさん＠そうだ選挙にいこう
19/03/09 18:32:20.35 .net
>>255
オフィスオンラインか、googleスプレッドシートなら無料だよ
どうしても無料がいいならそちらで試してみては

257:名無しさん＠そうだ選挙にいこう
19/03/10 01:58:27.23 .net
2003ってイルカとかさせ子先生とかの時代かw

258:名無しさん＠そうだ選挙にいこう
19/03/10 05:17:36.50 .net
>>249 なんで未だにそんな化石使ってんの
職場でならとっとと新しいの入れてもらえだし私用で金がないとかならOpenOfficeなり使えばいいじゃん

259:名無しさん＠そうだ選挙にいこう
19/03/10 06:28:12.85 .net
2003は軽いからなあ
回線やPCの性能が普通レベルでもgooスプは動作が重くてあんまり常用したいとは思わんな
ネット越し共有が簡単にできるのはいいけど

260:名無しさん＠そうだ選挙にいこう
19/03/10 09:32:21.55 .net
ここのスレでこういう反応なのは、時代かな。
他に旧いの使っているよっていうスレがあるならそっちにいってみよう。

261:名無しさん＠そうだ選挙にいこう
19/03/10 10:11:59.22 .net
時代じゃなくて普通だよ
2003はさすがに不便すぎる
家計簿作るなら十分すぎるけど

262:名無しさん＠そうだ選挙にいこう
19/03/10 10:17:24.44 .net
オフィスは1万②万かかると思ってたけどもっと安く買えるからね
しらないころは2003年ぐらいを最近まで使ってた

263:名無しさん＠そうだ選挙にいこう
19/03/10 10:28:16.36 .net
鍵屋を使えば・・・ｹﾞﾌﾝｹﾞﾌﾝ

264:名無しさん＠そうだ選挙にいこう
19/03/10 17:03:32.58 .net
>>216
これ覚えとくわ

265:名無しさん＠そうだ選挙にいこう
19/03/10 18:15:49.63 .net
cell関数はひと通り見ておいたほうが良い
inderectみたいに少し変わった使い方が出来る
大半は一生使わんけどな

266:名無しさん＠そうだ選挙にいこう
19/03/10 18:58:45.47 .net
>>261
＞2003はさすがに不便すぎる
このスレの総意なのね。と受け取っておくよ、一応は。

267:名無しさん＠そうだ選挙にいこう
19/03/10 21:37:08.56 .net
MSサポート対象外という事もあって
会社等はせいぜい古くても2010使ってると思う

268:名無しさん＠そうだ選挙にいこう
19/03/10 21:59:05.51 .net
いまだに全社的に2000使ってるところは、たぶんライセンス違反やろ。
確か入れ放題だったはず。
まともな頭してれば買い換えるんやけどな

269:名無しさん＠そうだ選挙にいこう
19/03/10 22:09:40.03 .net
2013でも使いにくいと思う
Excelくらい新しいの入れろよな

270:名無しさん＠そうだ選挙にいこう
19/03/10 22:52:06.74 .net
2003は不便すぎて会社に損害与える
無料でも高い

271:名無しさん＠そうだ選挙にいこう
19/03/11 12:22:25.20 .net
役所なんかは、xlsファイルじゃないと受け渡し拒否してくるから
2003でどこまでできるかは把握している人は多いよな
xls形式だと2010以降の機能使うとエラーになりやすいから

272:名無しさん＠そうだ選挙にいこう
19/03/11 12:25:44.94 .net
>>271
間違えた
2007以降
COUNTIFSとか使うとエラーになりやすいw

273:名無しさん＠そうだ選挙にいこう
19/03/11 18:10:38.79 .net
C1のセルに、次のような表の値を計算して値を出力するにはどの様な関数を使用すればよいでしょうか。どうぞよろしくお願い致します。
A列に数量
B列に価格
C1 = A1 * B1 + A2 * B2 + A3 * B3...

274:名無しさん＠そうだ選挙にいこう
19/03/11 18:14:12.87 .net
sumproduct

275:名無しさん＠そうだ選挙にいこう
19/03/11 18:46:51.45 .net
>>271
具体的にどこか教えてくれ
クレーム付けてくるわ

276:名無しさん＠そうだ選挙にいこう
19/03/12 17:13:34.94 .net
ティーノック

277:273
19/03/12 22:20:14.60 .net
>>274
ありがとうございます！
そのものずばりな関数があったのですね。助かりました

278:名無しさん＠そうだ選挙にいこう
19/03/13 00:00:37.17 .net
同じ計算をするのにsumproductと自分で配列数式組むのとどっちが早いんだろう？
sumproductは配列数式に皮を被せてるだけの関数に見えるから、内部的には同じ処理をやってる気がするけど

279:名無しさん＠そうだ選挙にいこう
19/03/13 05:53:20.71 .net
>>278
以前聞いた話だと、配列数式は配列数式化の判定をしてから処理が始まるので
同じ内容なら関数の方が処理軽いそうな

280:名無しさん＠そうだ選挙にいこう
19/03/13 08:46:01.68 .net
>>279
そうなんだ、演算の前に処理があるから専用関数の方が早いのね
VBAでコード組んで計測すればはっきりするんだろうけど

281:名無しさん＠そうだ選挙にいこう
19/03/13 20:37:11.41 .net
２４６８１０１２１４１６
みたいな数字をマスに並べるのは
＝Ａ１＊１　　みたいにいちいち入力していかないと無理ですか

282:名無しさん＠そうだ選挙にいこう
19/03/13 20:37:59.49 .net
ＶＢＡで、いつどのタイミングで作っても絶対に重複しない文字列を作りたくて、
思いついたのが、「その瞬間の月日時間秒を文字にすればいいんじゃね？」です。
つまり、本日ただいま文字列を作るとしたら、20190313203415（年月日時分秒）となるようにすればいいのだ、と。
でも、それを、どうやって　変数に入れればいいのか、わかりません。
ひとつひとつ、
year(date) & right( "0" & month(date),2) & ……　と指定するしかないのでしょうか？
もっとスマートに、「年と月と日と時と分と秒を桁をそろえて数値で構成される文字列に変えて」みたない
一発ですむような命令ってあるんでしょうか？

283:名無しさん＠そうだ選挙にいこう
19/03/13 20:38:16.27 .net
テーブルを使わず
２９
５０
２８
１０１
などの数値を昇順でならべることはできますか？

284:名無しさん＠そうだ選挙にいこう
19/03/13 21:40:05.75 .net
>>383　=NOW()

285:名無しさん＠そうだ選挙にいこう
19/03/13 22:52:00.63 .net
>>281 最初のセルに2を入れて増やしたい列、行、セルを選択して
ツールバーからホーム→フィル→連続データの作成を開いたら増分値に2入れる
2010しか手元になかったから新しいので違ったらごめん

286:名無しさん＠そうだ選挙にいこう
19/03/13 23:03:08.90 .net
>>282
format(now(),"yyyymmdd_hhnnss")
format関数は良く使うので覚えておいたほうが良い

287:名無しさん＠そうだ選挙にいこう
19/03/13 23:10:32.34 .net
>>283
数値がA1からA4にあるとして
B1からB4に昇順に並び替えるのであれば
=SMALL($A$1:$A$4,ROW())
をB1からB4に入力すればいい

288:名無しさん＠そうだ選挙にいこう
19/03/14 18:04:02.89 .net
2016から365に変えて以降、ふいに表示を小さくしすぎて
10%表示くらいになるとだいたいフリーズしてしまうんだが
スペック悪くないのにハードウェアアクセラレータのONOFFでも変わらないし
誰かおしえて

289:名無しさん＠そうだ選挙にいこう
19/03/14 18:33:39.06 .net
EXCEL 表示縮小フリーズ
で検索すると色々出てきすぎてどれか分からん
オブジェクトが多いとフリーズしやすいっぽい

290:名無しさん＠そうだ選挙にいこう
19/03/14 20:35:25.00 .net
>>281
数字の間にスペースかカンマいれて
区切り位置のツール使ったらどうでしょう。

291:名無しさん＠そうだ選挙にいこう
19/03/14 21:48:00.08 .net
質問させてください
例えば、
19という数字を4と3.5で割る（って言い方は正しくないかもしれないですが）と
4がいくつになって3.5がいくつになるかって言うのは
関数で出来るんでしょうか？

（19だったら4が4つ、3.5が1つ、余りが0.5）
（19だったら4が3つ、3.5が2つ、余りが1）
余りが3.5未満になるいくつかのパターンが出るように出来たらなお助かります

292:名無しさん＠そうだ選挙にいこう
19/03/14 21:50:17.19 .net
計算間違えました
（19だったら4が4つ、3.5が1つ、余りが0.5）
（19だったら4が3つ、3.5が2つ、余りが1）　←こっち余り0でした

293:名無しさん＠そうだ選挙にいこう
19/03/14 23:42:51.71 .net
ゴールシークと思うけど俺が使えないので回答キボンヌ

294:名無しさん＠そうだ選挙にいこう
19/03/15 00:37:14.37 .net
>>292
>>（19だったら4が4つ、3.5が1つ、余りが0.5）
?????
（19だったら4が4つ、3.5が0つ、余りが3）

295:名無しさん＠そうだ選挙にいこう
19/03/15 05:51:06.11 .net
>>293
うん、どっちも本気で間違えてました
このレベルで計算が出来ませんので自動で計算が出来る式が知りたいです

296:名無しさん＠そうだ選挙にいこう
19/03/15 06:04:52.11 .net
どちらでも割れる28とかの場合は、
4だけで7で割れるし、3.5だけでも8で割れちゃうけど
4と3.5どちらを優先するとかあるの？

297:名無しさん＠そうだ選挙にいこう
19/03/15 07:30:54.17 .net
>>296
出来れば半々くらいにしたいです

298:名無しさん＠そうだ選挙にいこう
19/03/15 13:30:25.25 .net
>>291
4と3.5の数を同じぐらいにしたいのなら
A1=元の数字
B1=4
C1=3.5
と入れて、
B2=INT(A$1/(B$1+C$1)) → これが4の数
C2=INT((A$1-B$1*B2)/C$1) → これが3.5の数
D2=A$1-B$1*B2-C$1*C2 → これが余り

299:名無しさん＠そうだ選挙にいこう
19/03/15 13:34:30.69 .net
>>291
複数パターン計算して自分で一番いいやつを選びたいなら
A1=元の数字
B1=4
C1=3.5
ここまでは同じ
続いて、
B2=ROW()-2
C2=INT((A$1-B$1*B2)/C$1)
D2=A$1-B$1*B2-C$1*C2
と入れたあと、B2C2D2を下のセルにコピペしていくと別の答えが何通りか計算できる

300:288
19/03/15 14:32:43.25 .net
>>289
マルチスレッド無効にしたらめちゃスムーズになりました
取急ぎ報告だけ

301:名無しさん＠そうだ選挙にいこう
19/03/15 18:49:57.38 .net
すいません、エクセル全く使い方わからないんですが、こういう使い方って出来ますか？(そういう関数というか入力式ありますか？)
{そのセルの行番号の数字-(そのセルの数字×別の数字)}+また別の数字のセルの数字を表示する
例えば、A100に10と入力したとして、
Aの{100-10×3}+1 (つまりA71)の数字をB100に表示する、ということです
(Aの1～100は全部何かしらの数字が入力してある)
(当然、↑のことができればそれに基づいてBも埋まっていく)
ということです

次ページ