X

Excel総合相談所 136

■ このスレッドは過去ログ倉庫に格納されています
0001名無しさん＠そうだ選挙にいこう
垢版 |
2019/07/27(土) 17:47:29.09
【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
0376名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/24(土) 18:31:55.71
【1 OSの種類 　 　 　 　 .】 Windows10
【2 Excelのバージョン 　 】 Excel2010
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否

B列からZ列くらいまで、10行の表があります。

B3の値が「出席」なら、B4のセルの背景色が青になるというように、
BからZ列までぜんぶ、「○3の値が出席なら○4の背景色を青」と
設定したいのですが、どのようにすればいいのでしょうか？

条件付き書式って、自分自身のセルのことしか無理っぽいです。
ひとつ上のセルを条件にするってことと、できればBからZまで一括設定がしたいのですが
何か方法あるでしょうか？
0377名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/24(土) 19:03:05.94
>>374
毎回範囲を選択した状態にするのも面倒なら
入力したい範囲のセルの書式設定の保護タブで、ロックのチェックを外し
校閲タブのシートの保護で、ロックされたセル範囲の選択のチェックを外すと
ロックされていないセル範囲＝入力したい範囲しかカーソルが動くことはなくなる。
0378名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/24(土) 19:20:09.13
>>376
１　B2:Z11のセル範囲を選択する
２　リボン→ホーム→条件付き書式→新しいルール→数式を使用して〜
３　数式を入れる枠に　=B1="出席"　を入力
４　[書式]ボタンをクリック
５　塗りつぶしのタブをクリック→塗りつぶす色を指定→[ＯＫ]をクリック
６　[ＯＫ]をクリック
B2:Z11を選択している状態で、数式にB1と指定したところがミソです。
0379名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/24(土) 19:21:54.75
>>376
B4セルの条件付き書式の条件の数式に
＝B3＝”出席”
でええんとちゃう？
なんでそのセルの値しか参照できないと思い込むのか分からん
0380名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/24(土) 19:51:33.75
【1 OSの種類 　 　 　 　 .】 Windows10
【2 Excelのバージョン 　 】 Excel2010
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否

条件で別領域に取り出すSMALL関数について質問があります。
B店舗夜間 25000
A店舗夜間 30000
Z店舗夜間　35000
Y店舗昼間　50000
Z店舗昼間　75000
A店舗昼間　100000
B店舗昼間 200000
上記のような売上表があって、
別セルに"A店舗夜間"を除外して、以下の式を別領域で計算していました。
={SMALL(IF(A$1:A$100<>"A店舗夜間",B$1:B$100),ROW(A1))}

条件に"B店舗夜間"も除外対象に追加したいのですが、うまくいかないのでご教示いただければ幸いです。
0381名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/24(土) 21:00:07.09
>>380
なんでフィルタオプション使わないの？
0382名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/24(土) 22:01:10.22
>>381
ご教示ありがとうございます。
確かにフィルターオプションでできました。
ただ、元の式から条件が追加になるだけだったので、式の軽微な修正でできるかと思ってました。
0383名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/24(土) 23:25:04.36
【1 OSの種類 　 　 　 　 .】 Windows８．１
【2 Excelのバージョン 　 】 Excel２０１３
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否

初心者ですが、ここにながれつきました・・・
エクセルの式で、どのように作ればよいか分からず
悩んでいます。

セルＡ１が「１」ならＢ２を反映、Ａ１が「２」ならＣ５を反映
としたいのですが、この場合どのような式になるのでしょうか。

ifsは2013では無理とやっと分かり、vlookupではとなりのセルしか
反映できない？みたいで、行き詰まっています・・・

すみませんが、どなたかご教授願います！
0386名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/25(日) 00:21:52.02
>>383
=CHOOSE(A1,B1,C5)
2013ならこれ
0388名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/25(日) 08:29:45.03
ご回答ありがとうございます！！

今晩、パソコンで試してみます！
色々とありがとうございます。
0389名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/25(日) 14:25:41.74
【1 OSの種類 　 　 　 　 .】 Windows 10
【2 Excelのバージョン 　 】 Excel 2010
【3 VBAが使えるか　 　 .】 初心者
【4 VBAでの回答の可否】 希望します

i = Int(100 * Rnd + 1)
変数 i に 1から100までのランダムな数値入れて
その内、NGとなる数字を30個、A1:A30に入力します。
そして i に A1:A30 の値を参照させて判定させたいのですが
複数のセルを参照することができません。
If i = Range("A1:A30") としても、参照されるのがA1だけになってしまいます。
If i = Range("A1,A2,A3…")としても、一緒でA1だけになります。
参照するセルが複数の場合、どのように指定すれば良いのでしょうか？

また、マクロではあまり、セルに入力されている値を参照するものでも
ないのでしょうか？分かりにくい説明ですみません、よろしくお願いします。
0390名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/25(日) 15:21:40.18
>>389
forで回すとか、WorksheetFunctionでやるとか

On Error Resume Next
hage = WorksheetFunction.Match(i, Range("A1:A30"), 0)
On Error GoTo 0

If hage > 0 Then
MsgBox "OK"
Else
MsgBox "NG"
End If
0391名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/25(日) 15:21:47.34
findか何かを使えばいいんだろうけど構文を調べるのが面倒だから
ForEachで作ってしまう僕が通るだけで後はまかせますよ
0397名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/25(日) 16:32:15.80
はじめのrangeオブジェクト
0398名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/26(月) 12:52:25.65
>>396
最初に見つけたところで検索終了
ただどこまで検索したのかの位置は内部的に記録してあって
それ以降のを検索するには
FindNextメソッド使って終わりまでループさせる
正直面倒な仕様だと思われ
0399名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/26(月) 14:50:29.32
vbaでIEを動かす際、テキストボックスへのfocusが、成功するときと成功しない（で次の処理に移行しエラーが出る）ときがあります
安定させるのに何か方法はないでしょうか？
0401名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/26(月) 19:23:48.02
【1 OSの種類 　 　 　 　 .】 Windows8.1
【2 Excelのバージョン 　 】 Excel2010
【3 VBAが使えるか　 　 .】 はい
【4 VBAでの回答の可否】 可

10シートのうち，「作業用」，「転記用」という名前が入っているシートがいくつかあります。
通常は非表示にしてあり，現在は，担当者が再表示する場合は「校閲」→「ブックの保護」→「パスワード入力」と行っています。

これを，例えば「シートの再表示」というマクロを実行すると，
1．「校閲」→「ブックの保護」→「パスワード入力」　まで自動で進む。
2．パスワードを入力する。
3．「作業用」，「転記用」という名前が入っているシートのみが再表示される。

また，逆に，
例えば「シートの非表示」というマクロを実行すると，
1．「校閲」→「ブックの保護」→「パスワード入力」　まで自動で進む。
2．パスワードを入力する。
3．「作業用」，「転記用」という名前が入っているシートのみが非表示される。

といいう動作にしたいです。
どのように記述したらよいか教えてください。
0404名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/26(月) 19:35:45.82
>>401です。追記です。
パスワードなしの場合は，以下のように記述しています。


Sub 転記用シート一括非表示()
Dim s As Worksheet
For Each s In Worksheets
If InStr(s.Name, "転記用") > 0 Then
s.Visible = False
End If
Next s
End Sub


Sub 転記用シート一括再表示()
Dim s As Worksheet
For Each s In Worksheets
If InStr(s.Name, "転記用") > 0 Then
s.Visible = True
End If
Next s
End Sub
0405389
垢版 |
2019/08/26(月) 22:49:48.87
アドバイスありがとうございました。
とても勉強させて頂きました。
私もいつかは回答者さん側になれるよう精進したいと思います。
0406名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/26(月) 23:01:40.34
A1をリスト入力に設定し、リスト候補をセル範囲指定に
している場合で、セル範囲（縦一列に入力）の下部セル
にリスト候補を追加入力しただけで、リスト候補として
追加される方法はありますか？
0409名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/26(月) 23:24:21.52
入力セルがA列、リスト候補の列が別のとこに設けている
ようにしています。
新しいリスト候補ができると、都度入力規則を設定し直
しているのを省略したいです。
0411名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/26(月) 23:39:29.30
【1 OSの種類 　 　 　 　 .】 Windows10
【2 Excelのバージョン 　 】 Excel2016
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否

Excelは計算量が多いと途中で計算をやめると聞きましたが、本当ですか？？
0415名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/27(火) 07:39:02.23
vba で複数シートを一括印刷する際、A1セルに「××」という文字列があるシートは除外して印刷するような設定ないでしょうか？
0418名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/27(火) 18:31:12.72
【1 OSの種類 　 　 　 　 .】 Windows８．１
【2 Excelのバージョン 　 】 Excel２０１３
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否

>>383　　です。色々と試してうまくいきました！ありがとうございました！

２つ目の試練が出てきました・・・・

Ａ１が１の時、　　Ａ３〜Ｍ３の範囲で「１であるセル」の下を選ぶ　（例えばＣ３が１なら、Ｃ４）

という指定は可能なんでしょうか。
0419名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/27(火) 18:35:09.06
418の続きです。

カレンダーの日付で、●日の時のメニューを、別シート（配送表）に反映させたいんです。
カレンダー様式は曜日が固定されていて、月によって●日という位置が変わるんです・・・

月　火　水　木・・・
１　２　　３　　４　　　　　　もあれば

月　火　水　木・・・
31　１　２　　３　　　　　　などもあり、

日付と一致するセルの下のメニューを引っ張りたいんですが、式で可能なんでしょうか。

何度もすみませんが、どなたかご教授願います。
0420名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/27(火) 18:58:25.22
↓だと半分ぐらいが削除されるのですが、なぜか削除されない行もあります。
セルにはスペースも何も入っていないで。
原因と解決方法を教えてください。



Sub Macro2()

'シート名「＊＊＊」のＣ列に空欄のセルがあれば、その行を行ごと削除して詰める

Sheets("＊＊＊").Select

For r = Cells(Rows.Count, "C").End(xlUp).Row To 2 Step -1
If Cells(r, "C").Value = "" Then
Rows(r & ":" & r).Delete
End If
Next r

End Sub
0421名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/27(火) 19:51:26.12
>>420

For r = Cells(Rows.Count, "C").End(xlUp).Row To 2 Step -1
If Cells(r, "C").Value = "" Then
debug.print r&"行目の中身："&Cells(r, "C").Value
Rows(r & ":" & r).Delete
End If
Next r

って感じでコンソールに出力すると良いよ

他にもF8のステップインって機能がある
一行一行見ていけば、変な行がわかる
0422384
垢版 |
2019/08/27(火) 20:40:32.82
>>383,418
これでどうでしょう。
=IF(A1=1,OFFSET(A3,1,MATCH(1,A3:M3,0)-1),"")

=IF(A1=1,　　,"")　の部分は説明不要ですね。
OFFSET(A3,1,MATCH(1,A3:M3,0)-1)の解説
OFFSET(A3,1,□)　　　で、A3セルを基準に１行下、□列右のセルを指定したことになります。
□はどうやってもとめるか・・MATCH関数の出番です。
MATCH(1,A3:M3,0)　で、A3:M3セル範囲（１行×１３列）の中から値が１のセルが何番目に
あるかを求める関数です。例えば、D3セルが１だったらMATCH関数の値は４になります。
このままではA3セルを基準に1行下4列右のセル＝E1セルを指定してしまうことになるので
MATCH(　)-1　としています。
ただし、A3:M3に一致する値がない場合はエラー　＃N/A　となります。

なお、>>419を見てみた限り、この方法がいいのかどうかはわかりません。表の全体がもう少し
詳しくわかればいいのですが・・・。
かといって、実際のファイルをアップすることはしないように。
週間カレンダー形式の表は私もいくつか作ったことがあります。
0423名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/28(水) 08:20:13.79
>>419
俺だったら、日付とその日のメニューを
左右2列に並べたシートを作り
それを元にカレンダー作るけどね
休業日のシートも作って
それもカレンダーに反映させればいいし
万年カレンダーでググればヒントになるの見つかるよ
0424名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/28(水) 09:09:15.81
>422　　ありがとうございます！自分の知らない関数でした！
確かに、これだといけますね！

範囲を複数にまたがる時ってどうしたらいいんでしょうか？
カレンダーなので、行が変わるんです。「Ａ３：Ｍ３」だけでなく、
「Ａ１０：Ｍ１０」も　みたいなイメージです。

>423
横に書くデータ入力シートを作って、それを反映させるって意味ですね？
入力する素人おばちゃんが、縦と横、目を回さずに間違いなく入力できたら
いいんですが・・・一度話してみます！

色々とありがとうございます。
0425名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/28(水) 12:15:10.15
>>424
横じゃなくて縦並び
手帳と同じ
日付,メニュー
2019/8/28,オムライス
2019/8/29,ハンバーグ定食
って感じ
0426名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/28(水) 12:50:53.91
カレンダー作る時
日付を“1”で入れるか“2019/9/1”で入れて
書式にd入れるのは見かけ同じで意味が違う
後者の方が応用させやすい
0427名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/28(水) 13:19:50.23
【1 OSの種類 　 　 　 　 .】 Windows10
【2 Excelのバージョン 　 】 Excel2010
【3 VBAが使えるか　 　 .】 少し
【4 VBAでの回答の可否】 不可

あるシートのＡ5に、=IF(A50>0,"支払済","未") という関数が入っており、それがＺ列まであります。
それぞれ、50行目に金額が入っていれば　支払済、なければ　未　と表示されるようになっています。

このＡ5からＺ5に、「値が　支払済　なら背景色変更」という条件付き書式を設定しようとしているのですが、
うまくいきません。
なぜか「値が　未　なら背景色変更」というのはできます。

「支払済」という文字が間違っているとは思えません。「済」という文字のコードに問題が？とか思って
関数も「すみ」に変えてもダメです。「未」だけ判定できる条件付き書式なんてありえるのかと
わけがわかりません。

何かアドバイスください。お願いします。
0429名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/28(水) 13:27:08.82
>>427
支払済を試しに半角英数字に変えてみては？
0431名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/28(水) 16:12:41.07
>>427
条件式に間違いは無いのでは？
ただ、それに対応する書式がきちんとしていないとか？

>>428
普通はそうだよね。
強いて言えば、A50に"金額"という名前を付ける方が後で修正のときに迷わない。
0432名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/28(水) 16:20:46.01
細かいこというけど、A50が空白かどうかの判定は
A50＞0,"支払済",“未”
じゃなくて
ISBLANK(A50),"未","支払済"
0433名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/28(水) 16:28:54.80
>>427
結局、支払済と未でそれぞれの背景を何色にしたいねん？
それを書かないとなんともなあ。
0434384,422
垢版 |
2019/08/28(水) 17:47:23.57
>>424　　　簡単に作ってみました。
>>423さんが書いてるような、入力のためのシートと週間カレンダー形式のシートで構成しています。
両方のシートを画面イメージでアップしました。
https://i.imgur.com/kVRc5G6.png
曜日固定のカレンダーに日付を設定するのは第１週の最後の曜日の日付を求める計算式が要です。
Ｂ１セルとＣ１セルに入れた年と月とＩ４セルの計算式で求めています。
Ｉ４セルの計算式の説明は割愛します。C4:I4、C7:I7、・・・のセルは計算式で日付を出しています。
セルの書式で日付のうちの日部分だけ表示するようにしています。Ｉ４セルだけ年月日を出してます。

入力シートから日付をキーとして引用する計算式は、図の下の方のＦ５のセルの
=IFERROR(VLOOKUP(F4,入力!$A$2:$C$50,2,FALSE)&"","")　　です。
$A$2:$C$50という、49行×3列のセル範囲の先頭列が日付の検索範囲で、２　は該当したら
2列目(Ｂ列)のセルを返すようにしています。
項目２の欄であるＦ６セルの計算式は
=IFERROR(VLOOKUP(F4,入力!$A$2:$C$50,3,FALSE)&"","")　　です。違いはわかりますか？
0437名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/28(水) 22:21:47.09
【1 OSの種類 　 　 　 　 .】 Windows10
【2 Excelのバージョン 　 】 Excel2010
【3 VBAが使えるか　 　 .】 勉強中
【4 VBAでの回答の可否】 可

数式や関数がたくさん入っていて非表示になっているシート1があるとします。
VBAで、このシートのコピー（各セルの値はすべて値を貼り付け的な処理をして関数や数式は残さない）
を別ファイルとして保存することは可能でしょうか？

可能なのかどうか、また、できればそのコード（長くなるならヒントだけでも）を教えてください。
0439名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/28(水) 23:37:15.59
【1 OSの種類 　 　 　 　 .】 Windows10
【2 Excelのバージョン 　 】 Excel2019
【3 VBAが使えるか　 　 .】 可
【4 VBAでの回答の可否】 可

特に質問はないので、一応テンプレだけ。
0441名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/29(木) 00:38:59.27
>>437
ようは、マクロの記録でも出来る
そのマクロコードでオブジェクトやプロパティの意味を知りたければドラッグしてF1押せばマイクロソフトのサイトで解説してくれる
0442名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/29(木) 08:57:40.67
>434

ありがとうございます！

まだパッと見てもわからないので(笑)
少し夜考えてから質問させてください！

写真まで丁寧にありがとうございます(＾◇＾)
0443名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/29(木) 15:59:20.40
>434

何分か見比べてみました。何となくわかります！(笑)
画像つきで丁寧に教えていただきありがとうございます(^^)

ＶＬＯＯＫＵＰ関数なるものは、検索してわかりました。（IFERRORも）
これを使うには、入力シートが、横に項目１・２と続く場合に
拾うというものですよね。縦のものを拾う関数は存在しないんでしょうか。

お弁当屋さんなんですが、結構デザートまで入れると６種目あって、
メニューの品名も長くて。縦に項目１・項目２として、それを反映する関数だと
一番入力する人間もわかりやすいのかなって思ってしまい・・・

でも、これが一番よいのかも！？
0444名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/29(木) 17:07:27.43
>>443
一応、HLOOKUPというものもある
今年後半からXLOOKUPというのも出るそうだ

VLOOKUPよりindex+matchの方が使い勝手良いから使ってきたけどXLOOKUPの方が楽かもしれない
0445434
垢版 |
2019/08/29(木) 19:48:56.33
>>443
まさか”メニュー”という言葉が出てくるとは！
自分は現在、福祉NPOに関わってて、ボランティアでパソコン関係の支援をしてます。
NPOの調理部門のメニュー表作成で以前作ったもののイメージをアップしたので参考にしてください。
https://i.imgur.com/rtRqHo9.png
左側のシートは”DB”シートです。同じ日付で4行あるのは、朝・昼・夕・おやつ　の４種類のためです。
VLOOKUPの対象となるのはC列〜Ｉ列です。
出力側シートのC11セルの計算式が見えてますが、おもしろいことに「昼食」の欄(C9:C13)の計算式は
全て同一です。計算式中の　ROW()-7　の部分で自動的に引用する列をずらしているからです。
C11セルなので　ROW()-7　の結果は　11-7=4　→　VLOOKUPの対象となるのはC列〜Ｉ列なので
4列目にあたるF列の値が引用されます。
0451名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/29(木) 20:57:04.85
vlookup　初級者
indexとmatchで　初級者＋
vlookupmatch　中級者

実務で間違いが起こらないように数式を組み立てる事が出来る、これが一番大事
技術が幾ら凄くても間違ってたら駄目なんだ
0456名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/29(木) 22:52:34.65
Ｉ列にゼロがあれば、そのセルをクリアにするようにしたいのですが


For Each c In Range("I:I")
If c <= 0 Then
c.Clear
End If
Next c

これだと結構時間がかかります。
早くするコードをおしえてください
0458名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/29(木) 23:01:22.17
>>456
オートフィルタかけたらいかんの？
range("a:i").autofilter field:=9,criteria1:="<=0"
range("i:i").clear
range("a:i").autofilter
0460名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/29(木) 23:03:25.06
>>456
Sub Macro1()
列 = 9
最終行 = Cells(Rows.Count, 列).End(xlUp).Row
For i = 1 To 最終行
If Cells(i, 列) = 0 Then
Cells(i, 列).Clear
End If
Next
End Sub

>>457-459
お、お前等
シートの最終行まで見てる事が遅い原因だぞ
0462名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/29(木) 23:36:30.59
Excelの機能でできることはExcelの機能で実現しないと遅くなるよな
0465名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/30(金) 01:14:28.40
【1 OSの種類 　 　 　 　 .】 Windows7
【2 Excelのバージョン 　 】 Excel2010
【3 VBAが使えるか　 　 .】 いいえ
【4 VBAでの回答の可否】 否

あいうえおおおかき(abcd)くけこさ(efef)しすせそた(gggg)ちつてと

上のようなパターンの文字列がありまして、いくつか（多くて5つくらい）のカッコで囲まれた文字列を除く計算式が知りたいです

結果こうなりたい
あいうえおおおかきくけこさしすせそたちつてと

置換Ctrl-Hじゃなくて計算式でよろしくおねがいします。
0469名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/30(金) 12:56:01.44
>>465
ユーザー定義関数使っていいなら出来るが
VBA否だからなあ
0470名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/30(金) 16:37:36.69
特選！黒板チョークアートがギッシリ満載！無料イラスト商用OK
https://56emon-cafe.com/kokuban-art-osusume-ac
カフェイメージ特選13作!無料イラスト商用OK.クレジット表記不要！
https://56emon-cafe.com/cafe-sozai-osusume-ac
【無料ダウンロード】美しい！マンダラ模様20選！ 商用利用も可能
https://www.seleqt.net/design/free-mandala-vectors/
イラストレーター ぶらおさんの無料イラスト
https://www.pinterest.jp/pin/589479038700927178/
https://www.ac-illust.com/main/profile.php?id=NbsX7TdR
フリーオシャレ素材　VintageVillageヴィンヴィレ
http://vinvill.com/
無料&商用OK！子供向け&アートなアルファベット・数字素材
https://kmy.website/kids-art-alphabet/
ロゴ作成ツール11選　無料でおしゃれなデザインを簡単に作れる！【商用OKも】
https://mag.app-liv.jp/archive/119964/
過去最大級！ナチュラル手描きイラスト素材集75万円分が
99％オフの破格セール中（水彩・パステル・線画）
http://photoshopvip.net/117245
文字をかっこよくデザインする！すごいPhotoshopテキストエフェクト厳選66個まとめ【2019年版】
http://photoshopvip.net/107585
0471名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/30(金) 16:44:13.85
ＶＢＡ実行ファイルと同じフォルダ内に複数のＣＳＶファイルがあり、そのＣＳＶの各ファイルのＡ〜Ｇの２行目以降を
コピーしてＶＢＡを実行するＢｏｏｋの“日報”と言うシートに張付けて、行を累積していくコードを教えてください。

それぞれのＣＳＶファイルの最終行はＡ行の最後です。
0472名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/30(金) 17:47:17.95
>>471
何かの試験問題か？
>A行って何？
A~G言うから、これ列指定かと思ったら行と来たもんだ？
そもそも、どういう構造のCSVやねん？
0473名無しさん＠そうだ選挙にいこう
垢版 |
2019/08/30(金) 19:10:25.27
複数のシート間で対応するセル同士を相互リンクするのって関数じゃ無理ですか？
どちらで更新しても全てに反映されるような
0474471
垢版 |
2019/08/30(金) 19:39:32.82
>>472

すみません。Ａ列でした

それぞれのＣＳＶファイルはＡ列〜Ｇ列に文字が記入してあります。
■ このスレッドは過去ログ倉庫に格納されています
ニューススポーツなんでも実況