第1弾は趣味Q&A!
テクノロジーのQ&A
回答数
気になる
-
571
メモ帳の出力形式
win10ではディフォルトが「utf-8」と出ていますが、 「SJIS」に固定したいのです。 そして、いろいろサイトに出ていますが、 どれも上手くいかず、 結局は「さくらエディタ」にしましたが、 これでもダメでした。 なお、 「さくらエディタ」では、中身があれば一度「SJIS」に指定すると それが引き継がれますが、 全く中身がなくなると「utf-8」に戻ってしまいます。 出来ればwindowsのメモ帳で、 それがだめならさくらエディタで、「SJIS」固定の方法を教えてください。 宜しくお願いします。 win10homeです。
質問日時: 2024/07/17 13:58 質問者: nagahaha カテゴリ: Windows 10
ベストアンサー
3
0
-
572
【ExcelVBA】値を変更しながら連続でPDFを作成し,ファイル名を自動で付して出力するコード
「回答」シートにおいて1行に1件ずつデータが入っており,I2セルからI3セルで行番号を始点,終点として指定すると「様式」シートに指定した行のデータが順番に反映され,それらを結合した状態で出力し,ファイル名はI2セルに入力した行のデータ容に則したものになるコードについて伺います。 以前,この掲示板で質問させていただいおり,そのときは「ファイル名はI2セルに入力した値のときに「様式」シートに反映される内容に則したものにしたい」という条件がなかったため,そのときに教えていただいたコードに修正を加えたものが以下のコードですがエラーで止まってしまいます。 (l = Sheets("回答").Range("N7").Value &~の部分で止まってしまいます) どのように修正したらよいか,ご教示願います。 Sub 連続PDF作成() Dim stK, stY, stD Dim startN, endN, i As Long Const AA = "A1:H40" ' ← コピー(転記)対象のセル範囲 Dim l As String ' ← 作成するPDFファイル名 Set stK = Worksheets("回答") Set stY = Worksheets("様式") startN = stK.Range("I2").Value endN = stK.Range("I3").Value If Application.CountBlank(stK.Range("I2:I3")) > 0 Or _ Not (IsNumeric(startN) And IsNumeric(endN)) Then _ MsgBox "無効な入力です": Exit Sub Application.ScreenUpdating = False Application.DisplayAlerts = False stY.Copy With ActiveWorkbook Set stD = ActiveSheet For i = startN To endN stK.Range("A5").Value = stK.Cells(i + 9, 1).Value stD.Copy after:=.Worksheets(.Worksheets.Count) .Worksheets(.Worksheets.Count).Range(AA).Value = stY.Range(AA).Value Next i stD.Delete stK.Range("A7").Value = stK.Cells(startN + 9, 1).Value l = Sheets("回答").Range("N7").Value & "・" & Sheets("回答").Range("G7").Value & "・" & Sheets("回答").Range("D7").Value .ExportAsFixedFormat xlTypePDF, ThisWorkbook.Path & "\" & l & ".pdf" .Close False End With Application.DisplayAlerts = True Application.ScreenUpdating = True End Sub
質問日時: 2024/07/16 17:12 質問者: qazxcvfr4 カテゴリ: Visual Basic(VBA)
ベストアンサー
6
0
-
573
エアコンの室外機の上にアルミを載せると節電になるでしょうか?
エアコンの室外機の上にアルミを載せると節電になるでしょうか?
質問日時: 2024/07/12 08:57 質問者: スタバウォッチ カテゴリ: エアコン・クーラー・冷暖房機
解決済
21
2
-
574
【ExcelVBA】名前を付けて保存→PDF保存をマクロで実行できますか?
現在の運用では、 マクロを実行すると、指定されたセル内を非表示になるようになっていて、 それから、特定のシートのみを選択して、ファイル→名前を付けて保存→PDF形式にして保存 という手順なのですが、 ・たまに非表示にするマクロを実行し忘れる ・特定のシート以外を誤って選択している時がある というミスが起こるので、 準備したマクロボタンを押下するだけで ・非表示マクロを実行 ・指定のシートを複数選択 ・現在開いているフォルダに、PDF形式で保存 を一括で処理できないか考えています。 どのようにしたらよいでしょうか?
質問日時: 2024/07/10 00:54 質問者: tanapyondai カテゴリ: Excel(エクセル)
解決済
4
0
-
575
EXCELの散布図で日付が1900年になってしまう
EXCELの散布図で横軸を日付にしたいのですが、年が正しく表示されません。 正しく表示する方法を教えてください。 画像の通りのデータを散布図にしているのですが、2010から2024年のデータなのにグラフでは1900年の日付になってしまいます。月日も正しく反映されていません。 A列の書式、図のX軸の書式とも「日付」にし、"*YYYY/MM/DD"と"YYYY/MM/DD"の両方を試していますが、どちらも結果は同じです。 =YEAR(A2)などとすると 2010 が返ってくるのですが、何がいけないのでしょうか。 Officeのバージョンは2019です。 よろしくお願いします。
質問日時: 2024/06/30 18:35 質問者: ZakuzakuUhauha カテゴリ: Excel(エクセル)
ベストアンサー
6
0
-
576
dアカウントログインができません
IDは分かります。 が 大分前にパスワードを間違ってしまって その後正しいのを入れましたが パスワードがロックになってしまいました。 で電話番号のショートメールが送られてこないのです。 でどうしたら良いかお手上げです。 でお問い合わせにしても例ばかり出て一向に分からないです。 でgメールで登録したけど・・それもダメでした。 もう分かりません。
質問日時: 2024/06/24 14:03 質問者: moko1628 カテゴリ: その他(セキュリティ)
ベストアンサー
3
0
-
577
無風エアコン買いたいのですが、東芝大快晴とパナソニックエオリアcs224djrでなやんでいます。風が
無風エアコン買いたいのですが、東芝大快晴とパナソニックエオリアcs224djrでなやんでいます。風が弱いのは大快晴でしょうか?
質問日時: 2024/06/07 14:39 質問者: mediko カテゴリ: エアコン・クーラー・冷暖房機
解決済
2
0
-
578
アンダーバーつき緑丸マーク白チェックの直し方
アンダーバーつき緑丸マーク白チェックの直し方 教えてください。
質問日時: 2024/05/14 20:04 質問者: yama100a カテゴリ: Chrome(クローム)
ベストアンサー
1
1
-
579
エアコン2台同時使用で、ブレーカーが落ちる?
既存のエアコンは2.2kwで、新しく設置するエアコンも2.2kwです。 築30年以上のアパートに住んでおり、 ブレーカーをみましたところ、「単2-30A」と書かれています。 新しく設置するエアコンと既存のエアコン2台同時使用で、ブレーカーは落ちますでしょうか。 エアコンは、それぞれ違う部屋に設置予定です。 ご存知の方、教えてください。
質問日時: 2024/05/06 08:21 質問者: Sergei カテゴリ: エアコン・クーラー・冷暖房機
解決済
20
1
-
580
スマホを持っていても、パソコンは必要ですか?
スマホを持っていても、パソコンは必要ですか?
質問日時: 2024/05/03 20:10 質問者: hana5687 カテゴリ: その他(スマートフォン・携帯電話・VR)
ベストアンサー
21
2
-
581
ショートメールでこの様な迷惑メールが毎日20件以上届くのですが同じ様な方居ませんか?
ショートメールでこの様な迷惑メールが毎日20件以上届くのですが同じ様な方居ませんか?
解決済
2
0
-
582
Amazonの買い物で「マケプレお急ぎ便(無料)」は本当に無料ですか? 過去に送料無料を選んだら有料
Amazonの買い物で「マケプレお急ぎ便(無料)」は本当に無料ですか? 過去に送料無料を選んだら有料会員に自動登録されて結局送料は実質有料という経験がありました。
解決済
1
0
-
583
学校配布のタブレット キーボードが反応しない
今日、学校からタブレットを配布されました。 ARROWS Tab Q5010 です。 立ち上げてみたところ、キーボードが反応しません。再起動したり、キーボードを取り外してみたりもしました。タブレットモードはオフにしています。 上の子も同じものを持っているので、それと入れ替えてみたりもしました。上の子のタブレットでは、下の子のキーボードは反応しました。下の子のタブレットでは、上の子のキーボードも反応しません。 ややこしい書き方になりすみません。 何か解決法があれば教えてください。
ベストアンサー
3
0
-
584
Windowsを更新したら、タスクバーが透明になってしまいました
私はWindows11を設定等でWindows10化させて使用しているものです。最近Windowsの更新がかかり、起動してみると、ウインドウの一番下のタスクバーの背景が透明になってしまいました。カーソルを持っていくと多少色はつくのですが、透明ですとデスクトップが濃いところは文字が見にくいので、タスクバーは淡色カラーにしたいです。ググって設定等試みているのですが、個人設定のタスクバーのカラー設定がグレーアウトしてオンにできない状態です。とにかく、色は何でもよいので透明をやめたいです。どうしたらよいでしょうか。
質問日時: 2024/03/16 00:12 質問者: shukronajon カテゴリ: Windows 10
ベストアンサー
6
1
-
585
【至急】鳥のフンを気づかず洗濯してしまった時
鳥のフンに気付かず洗濯機で洗濯してしまったようです。 持っていた鞄に鳥のフンがついていることに気づき、場所的に着ていた服にもついていそうなんですが気付かず洗濯してしまいました。 洗剤はシャボン玉洗濯石鹸スノールを使っています。 外出時間は30分ほどで、前半は傘をさしていた為、恐らくフンがついてから15分くらいで帰宅し洗濯機で洗濯を開始したと思います。 気付かず洗濯機に入れたので、予洗いなどをせずです。 自宅にはこの石鹸洗剤しか無いのですが、この石鹸で洗濯で大丈夫でしょうか? また、1回の洗濯で良いですか? 洗濯槽クリーナーを使ってドラムを洗浄した方が良いでしょうか? 悲しすぎて思考停止してます… 鳥のフンは水溶性とのことで、水に溶けるなら洗濯機での洗濯だけで大丈夫か…でも感染性があるとの記載も見たので洗濯機で石鹸洗剤だけでは感染を防げないのか…等ぐるぐる考えて結論も出ません。 当方、強迫性障害気味で、普通の感覚がちょっとわからないところがあります。 みなさんならどうされますか? 詳しい知識をお持ちの方、どうしたら1番良いでしょうか? 小さい子もいるので、不安です。 詳しい方、どうか教えてください。 宜しくお願いします。
解決済
10
0
-
586
windows defenderで質問です。 「脅威がブロックされました。 重大」と表示されたフォル
windows defenderで質問です。 「脅威がブロックされました。 重大」と表示されたフォルダがあったので、手動でゴミ箱に移動し、削除したのですが、これで問題はないのでしょうか?
質問日時: 2024/03/12 19:14 質問者: ルピーン カテゴリ: マルウェア・コンピュータウイルス
ベストアンサー
2
0
-
587
パソコンの電源を入れた直後、ファンがうるさいのですが、しばらくしたら音が鳴りやみます。パソコンという
パソコンの電源を入れた直後、ファンがうるさいのですが、しばらくしたら音が鳴りやみます。パソコンというのはこういうものなのでしょうか?また、なにか対策できるものでしょうか?
質問日時: 2024/03/01 18:40 質問者: 山田貴之 カテゴリ: その他(パソコン・周辺機器)
解決済
9
0
-
588
VBA 別ブックからコピペしたいのですが、軽くしたいです
VBAかなり初心者です。 シンプルなVBAのフォーマットを作成してみましたが、とっても遅いです。 色々調べたものの、自分でやりたいことが軽いコードでできませんでした…。 1.別のブックは毎回ブックネームが異なるため、ファイルから選択する形式を希望 (今回はREPORT.xlsxのFinal Dataシートより) 2.そのブックの列ごとコピーして、このVBAが入っているブック(Book1.xlsm)のDataシートに貼付けをしたい ************************************************************************* Sub Sample2() '別ブックを開く Dim OpenFileName As String OpenFileName = Application.GetOpenFilename("Microsoft Excelブック,*.xls?") If OpenFileName <> "False" Then Workbooks.Open OpenFileName End If 'データをコピー 上記で選択して開いた別ブック Windows("REPORT.xlsx").Activate a = Sheets("FinalData").Select Columns("A:A").Select Application.CutCopyMode = False Selection.Copy 'データをペースト Windows("Book1.xlsm").Activate Sheets("Data").Select Columns("A:A").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("A1").Select Application.CutCopyMode = False Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove End Sub ************************************************************************ いくつか速くできるようなQ&AのWEBページがあったのですが、なかなかうまく回りませんでした…。 コードを教えていただけると大変助かります。 何卒よろしくお願いいたします。
質問日時: 2024/02/26 18:41 質問者: Sakokosan カテゴリ: Visual Basic(VBA)
解決済
3
0
-
589
ヤマダ電機で冷蔵庫を買い、11年保証契約をしていました。四年目になって最近冷えにくく、電話したところ
ヤマダ電機で冷蔵庫を買い、11年保証契約をしていました。四年目になって最近冷えにくく、電話したところメーカーが来て治すので部品と出張料金がかかると言われました。これって保証としてどうなんですか? 保証って無料で直してもらうためじゃないんですか? なにかお金を負担せずに治せる方法を教えてください!
解決済
16
0
-
590
フリマアプリで普通評価を付けるのはどんな時ですか?
出品者ですが、ある取引についてモヤっとすることがあり相手の評価を良いにするか普通にするか悩んでいます。 基本はいつも良い評価で済ませていますが今回は迷っています。 相手のアカウントは新規で、やり方がわかっていなかったかも知れないけど、 評価下げられるのを承知で捨て垢の可能性もあるなあと・・・。 今後も使っていくアカウントなら初っ端から普通を付けられてしまうのはかわいそうだけど、 スンナリと良い評価を付けるのは自分がモヤっとします。 どんな時に相手に普通評価を付けていますか?
質問日時: 2024/02/03 09:28 質問者: zakuzaku0826 カテゴリ: ラクマ(楽天オークション)
解決済
1
0
-
591
街中でみかけたものについて
お茶の水付近の線路沿いを歩いていたのですが、線路の壁になぜか、USBメモリが刺さっていました。 このUSBメモリーは何のために誰が設置したのでしょうか?ご存じの方いらっしゃいましたら教えてください
質問日時: 2024/02/03 06:42 質問者: fumihito カテゴリ: USBメモリー・SDカード・フラッシュメモリー
解決済
4
1
-
592
NHKから特別あて所配達という郵便物が届いたので、今まで数年間テレビはあった状態で契約はスルーしてお
NHKから特別あて所配達という郵便物が届いたので、今まで数年間テレビはあった状態で契約はスルーしておりましたが、この度契約をしようかと考えております。 ネットから契約しようかと思っておりますが、テレビの設置日を入力する箇所をこの度の契約する契約日にした場合は数年遡っての請求はされないのでしょうか? それともテレビの設置日を契約日にしても契約の個人情報をもとに何かしら調べられて数年前からのテレビの設置がバレてしまい、過去の分も請求されてしまうのでしょうか?
解決済
4
0
-
593
最近Xを始めたのですが(見るだけです。)
写真の拡大ってできないんですか? スマホでもPCでもそのままなんですが。
質問日時: 2024/01/22 08:00 質問者: ピクセル7 カテゴリ: X(旧Twitter)
ベストアンサー
3
0
-
594
楽天カード
楽天カードで買い物をしたのですが明細が0円となっており確定となってます 買い物をしてからどのくらいで明細に反映されますか? また自動リボ払いの仕組みを教えてください
解決済
3
0
-
595
Switchがインターネットに繋がらなくなりました
昨日まではつながっていたのですが 今日つなごうとした所 「このネットワークを使うには、手続きが必要です。」と 表示され パスワードを入力する場面に飛ばされますが Wi-Fiをつなぐ時に使うパスワードを入力してもダメでした どうすれば良いでしょうか というか何が原因なんでしょうか…昨日までは使えていました 一応ですが 無線LANを使うのは自分ひとりしかいません 機種はBUFFALOです
質問日時: 2024/01/14 15:44 質問者: takatomae カテゴリ: Wi-Fi・無線LAN
ベストアンサー
4
0
-
596
印刷機能でPDFファイルのページサイズを変更できるPDFソフト
例えば、標準のA3サイズ420mm×297mmを、422mm×298mmとかに変更できるPDFソフトを教えてください。
ベストアンサー
6
1
-
597
リフレッシュレートを誤って166hzにして、画面が真っ黒
はじめまして。 早速ですが質問させていただきます。 【環境】 Windows10 64bit Pro 【質問】 nVIDIAの画面設定で、リフレッシュレートを誤って166hzにしてしまいました。 このモニタは144hzまでしか対応してなく、そのせいで画面が真っ黒になってしまいました。 再起動してもずっと真っ黒、、、何も操作ができません。 どうやって戻せばよいのでしょうか? どなかた教えてください。よろしくお願いします。 【試したこと】 ・セーブモードで起動→セーフモードならちゃんと表示される。 セーフモードで画面解像度を800(この解像度はリフレッシュレートが60hzまで)にしても、再起動すると真っ暗。 ・nVIDIAのドライバやらコントロールパネルをアンインストール → ダメ
質問日時: 2024/01/08 20:33 質問者: haigoreiuzai カテゴリ: Windows 10
ベストアンサー
1
0
-
598
GoogleアカウントのGmailは何個まで可能ですか? 1つの電話番号で最大 Googleアカウン
GoogleアカウントのGmailは何個まで可能ですか? 1つの電話番号で最大 Googleアカウントは何個まで可能ですか?
ベストアンサー
5
0
-
599
スクリーンショットで撮影するときに日付時刻が重なり壁紙にできなくないですかよろしくお願いしますm(_
スクリーンショットで撮影するときに日付時刻が重なり壁紙にできなくないですかよろしくお願いしますm(_ _)m
質問日時: 2023/12/21 06:18 質問者: yamaneko567 カテゴリ: iPad
解決済
3
0
-
600
ルータ故障?
RV-S340SE フレッツ光で、上記のルータを使ってます。 さっき、急にネットに繋がらなくなって、 ルータの電源を引っこ抜いて、 電源を入れ直したら、繋がりました。 こんなことは初めてです。 壊れる前触れでしょうか。 やるべきことはありますか。 教えてください。
質問日時: 2023/12/11 07:38 質問者: baojoajvaoj90 カテゴリ: ルーター・ネットワーク機器
解決済
9
0
あなたの趣味に関するQ&Aを探してみてください!
おすすめ情報