Excel(エクセル)

全10159件中1~20件表示
  • ピポットテーブル元データ削除しても更新される

    ピポットテーブルを作成し、一応、元ファイルの複製を作りました。 複製ファイルのほうの、元データ表を(テーブルとのシートは別)削除してもピポットテーブルは残るか試したところ、テーブルは残り、またデータの種類(たとえば「値フィールド」の「値」の「単価」を「個数」に)変更しても、正常にできました。 これはなぜなのでしょうか? テーブルが残るのはわかりますが…。

  • エクセルVBA 参照ファイルに書き込み出来ない

    エクセル2016の振る舞いがエクセル2003と異なる 何とかしたいが、エクセル2003では何の問題も無い。 Workbooks(Csvbook).Worksheets(CSV_SHEET_NAME).Range(Cells(Line, 1), Cells(Line, 234)) = VAL() または Worksheets(CSV_SHEET_NAME).Cells(Line, N).Value = UserForm1.Controls("TextBox" & Format$(N)).Text 実行時エラー'1004':アプリケーション定義またはオブジェクト定義のエラーです。 で処理事止まるが継続で正常動作する。 プログラム変更後ビルド前では思ったように動作する。 別のエラー発報後はサクサク動作する。 2003と2016の見た目は 2003では参照CSVウインドウがActivateのままである 解決策ご教示頂けないでしょうか。

  • エクセル 複数ファイルの関数リンク 更新する

    複数のエクセルファイルをリンクづけて作成しました。 A:もとになるデータを入力→B~Cの結果を表示する B~C:Aの日付とデータをもとに関数でいろいろ計算 Aを開くとB~Cの結果がでるように作成したのですが、Aに入力するだけでは更新されません。Aに入力してB~Cをいったん開いて保存すれば更新されますが、これはいちいちしないといけないですか? Aのみ開いて入力すれば、ほかの3つもデータが更新される方法はありますか?

  • VBAで時間を正規表現するパターン

    VBAで時間を正規表現するパターンを教えて下さい。 セル中の文字列に混在する  時間の形式に統一性がありません。 考えられる形式は、以下のパターンです。 1:05:12 01:05:12 00:05:12 00:5:12 0:05:05 0:5:5 0:55:12 55:12 (mm:ss) 05:12 (mm:ss) 5:12 (mm:ss) 5:07 (mm:ss) 5:7 (mm:ss) ---------------------- ネットで探しても上記パターンを網羅するような  コードを探しきれませんでした。 下記のコードでパターンがヒットしない場合あり苦慮しています。 (REGEXMATCHは、セルフ関数で   Google スプレッドシートの REGEXMATCH 関数と同等の機能です。) For i = 1 To LastNo If REGEXMATCH(Ws2.Cells(i, "A"), "\d{1,2}(:\d{1,2}){1,2}") Then Ws1.Cells(i, "A") = Ws2.Cells(i, "A") '条件がTrueの場合 Else Ws1.Cells(i, "A") = "" End If Next

  • VBA - 区切り文字前後で抜き出す

    Excel(VBA)で  区切り文字の前後で抜き出す(フォーマット統一) A列に  時間(00:00又は00:00:00)と文字列の組み合わせが複数あります。 順番が以下の2パターン 時間 文字列 文字列 時間 時間は、半角のカッコ"()"で括られている場合もあります。 両者は、半角スペース(1個又は数個) 又はそれ以外の区切り文字列(-,|)で区切られています。 (半角スペースと区切り文字の組み合わせも有り) これらの統一されていないフォーマットを一つのフォーマットに統一したいと思います。  統一フォーマット形式は   区切り文字として半角スペース(1個)で、下記を想定    hh:mm:ss mojiretu (hh:mm:ssは、例えば 00:05:15) B列に変換されたフォーマットを書き出す ------------------------------------------------------ 元ターゲットは以下のフォーマットが想定されます。 0:00 second hand news 00:00 00 - It's Not All Truth #1. 00:00 - Heldom - Hávamál 00:00 - Drifts 00:00:00 Dream of Arrakis (00:00) Kontora 01. Sun Killer 00:00 1. A World Away | 0:00 1. Imperial - 00:00:00 Silent universe 00:00 01. The Tower [Theme from "The Work"] (00:00) Dotugo - (00:00:00) StarBath Jam 1 00:00 Burning 00:00 参考画像 https://imgur.com/CcO1moz ---------------------------------------------- 以下で区切り文字(@)の前後で文字列をそれぞれ書き出せますが  私のやりたいことは複雑なのでどのようにコードを変換したら良いでしょうか ? DimmyStrAsString DimfindStrAsString DimfindNoAsInteger myStr=Range("A1") findStr="@" findNo=InStr(myStr,findStr) Range("B1")=Left(myStr,findNo-1) '@より前の文字列' Range("D1")=Right(myStr,Len(myStr)-findNo) '@より後の文字列'

  • Excelのマクロについて

    sheetのB列からInputboxで入力した値を含むセルを1~複数個選択してフィルターする場合、どのようにすれば良いのでしょうか 一応自力で考えてみた結果、こんな感じになったのですが、上手くいきませんでした Range(B11).Select Myc=Inputbox(番号を半角数字で入力) Range("B11:B100").AutoFilter Field:=2, Criteria:=Myc 初心者なので、かなり雑な上に間違いだらけかもしれませんが、そこは勘弁して下さい よろしくお願いします

  • Excel折れ線グラフの座標軸を調整する方法

    Excelで左右2軸の折れ線グラフを作っています。 質問1:横軸の一番左の目盛線とプロット(2015年)が左縦軸と重なってしまいます。右側と同じように、0.5目盛分くらい隙間を空けたいのですが、どうしたらよいでしょうか? 質問2:座標軸目盛の数字と座標軸との距離は調整可能でしょうか?例えば、横軸の年号の数字を少し上にずらして横軸の線との距離を小さくしたいです。 宜しくお願いいたします。

  • 年月の計算について

    例えばなのですが  A列  B列 C列 D列 1 東京  金  ○ 2020.8 2 大阪  水 ○ 2019.7 3 東京  水 × 2020.8 4 東京  金  ○ 2019.5 5 大阪  金 ○ 2020.8 6 大阪  水 ○ 2019.7 7 大阪  金 × 2020.8 8 東京  金 ○ 2020.8 9 東京  金 × 2019.7 10 …他多数 の表があります。 「東京、金、○」 や 「大阪、水、○」の合計数を求めたい時は どう関数を使えばいいでしょうか? A列B列はセット扱いなのですが、 A列&"-″&B列等合わせて作るのは見辛くダメでした。 加えて、合計数を出したうえで 年月毎に振り分ける事は可能なのでしょうか?

  • 選択範囲から一番自然数に近いものを選び表示させたい

    Excel関数で 小数点以下を比較し一番整数(自然数)に近いものを 抽出したいのですが 何か方法は無いでしょうか? 

  • Excelを開けません

    Excel2018を使っています。 Excelのアイコンをクリックすると、‟・・・が見つかりません。名前を正しく入力したかどうか確認してから、やり直して下さい。”というメッセージが表示されるようになりました。 どこをどうすればいいのか全くわかりませんので、お教え下さい。

  • Excel縦棒グラフの横軸(2段)の縦線を消したい

    Excelで縦棒グラフを作成しました. 横(項目)軸の軸ラベルを2段にしたところ,各ラベルの間に長い縦線が入ってしまいました. この縦線(仕切り線?)を消して,横軸+短い外向き目盛だけにしたいのですが,やり方が分かりません. ご存知の方がいらっしゃいましたら,教えていただけないでしょうか.

  • Excelに挿入した元の画像を削除して良いのか?

    パソコンの画面をスクリーンショットして、ペイントに貼り付けて編集し、その画像をExcelファイルに挿入しました。 こうして挿入した画像の元画像を今はフォルダに保存しているのですが、これらを削除しても、以後このExcelファイルを印刷することはできるのでしょうか?削除してしまうと、その画像部分は空白になって印刷されてしまうのでしょうか? 挿入する画像の数がとても多いため、可能なら保存しておかずに削除したいです。 どなたか分かる方がいらっしゃれば、教えていただきたいです。 どうぞよろしくお願いいたします。

  • 複数シートのデータを1シートにまとめたい

    添付ファイルのシート名(A商店~C商店)のような同フォームの複数シートのデータをシート名(まとめ)にょうに1シートにまとめたいのですが、いい方法ご存知でしたらお教えください。  パワークエリで出来そうな気もするのですが  ちなみに実作業で使用するファイルはシート数は100くらいあり、行数も100行くらいあります。  EXCELに長けた方、お教えください。

  • マクロを回している時に別の既存Excelの加工をし

    タイトルの通りなのですが、マクロを回している間に、別の既存Excelを加工することってできますか? 検索するとマクロ中に別の新規Excelファイルを作りたいならExcelを2つ立ち上げる?みたいなのは見たんですが、新規ではなく既存です。

  • (VBA) 保存できない

    指定ディレクトリー(TurgetFolder)に保存しようとして  下記のコードを利用していますが、エラー(1004)が出ました。  添付画像参照下さい(丸数字有り) ------------------------- 'テキストデータにしたいシートを新しいブックとして作成し、そちらからテキストファイルを作成する Ws2.Copy ActiveWorkbook.SaveAs Filename:=TurgetFolder & FName & ".txt", FileFormat:=xlText ---------------------------- ①、②、④はエラー原因では無かった。 原因は、③で  フォルダー名に [ ] (左カッコ、 右カッコ)  を利用した事でした。  でもフォルダー名及びファイル名に同じ [ ]  があっても読み取り時は問題なく処理されます。 使用してはいけない文字があっても   他に保存する方法ありますか ? 例えば、  事前にダメ文字を書き換えて保存するとか ? EXCELの仕様で難しいのであれば諦めます。

  • エクセルで重複データの日付から6か月以上を見つける

    お世話になります。 添付の表のようにA列に製造日、B列にLOT Noを入れる表があります。 原料Aを製造したら品質検査をします。 その原料を後日使う時に、最近検査した日付から6か月い以上経過していいたらその原料AのLOTは使用する前に再度品質検査する必要があります。 具体的には着色セルのLOTは繰り返し使用されており、黄色のABC123は前回試験をした日から6か月以内なのでOK、橙色のセルのLOTABC129は2回目はOKですが、3回目の使用時には検査課必要です。 このように★を表示させる式、もしくはVBAをご教示いただきたく。 昔ここ?で教えてもらって試行錯誤して★を追加し、書式設定でLOT Noに色を付けることで解決した記憶があるので下記のような式の復元になりましたが★の列はなくても検査が必要なLOT No(前回の検査から半年以上経過LOT)に色が付けばOKです。 =IF(DATEDIF(SUMPRODUCT(MAX(A$2:A2*(C$2:C2=C3)*(D$2:D2="★"))),A3,"M")>=6,"★","") 宜しくお願いします。 (今、貼り付けた表を見たら少し矛盾がありますがご容赦下さい)

  • (VBA)指定したMP3の曲の再生時間を書き出す

    MP3の「曲の長さ」を調べて指定セルに書き出すコードを  以前教えてもらいましたが、  複数のMP3をターゲットにした場合を  配列を利用してセルに書き出しました。 今回は、単一のMP3の場合の  指定セルへの書き出しを教えて下さい。 以前、以下の記事を参考にしました。 http://officetanaka.net/other/extra/tips16.htm Dim TargetFolder as Varint Dim TargetMP3 as string 以上の要素は他のコードで既に取得済みです。 TargetFolder 例えば、C:\Temp\N1\ TargetMP3 例えば、C:\Temp\N1\N2.mp3 TargetMP3のMP3のファイル再生時間を  指定セル(Cells(20,"A"))に書き出す場合でコードを教えて下さい。 最終的には、以下に近い形式になると思いますが  以前は、配列で処理されているので単独の場合が分かりません。 Cells(20, "A") = Folder.GetDetailsOf(Folder.ParseName(Target), 27)

  • 【VBA】A1参照形式のままR1C1形式で条件書式

    ExcelでA1参照形式のまま、VBAで数式などR1C1形式で入れたとしても、たいていは自動でA1形式に変換してくれますよね。 ただ、例えば列は絶対参照にしたい場合、"$A1"をR1C1形式で記入すると"RC1"となり、A1参照形式のままだとRC列の1行目として認識しA1形式に変換してくれないんですよね(^_^; この度、2つの列の値を比べて相違するものだったらセルの色を変える条件書式を入れるVBAを書いたんですが、 Selection.FormatConditions.Add Type:=xlExpression, Formula1:= "=AND(RC2<>"""",RC1<>RC2)" 「B1セルが空欄ではなく、A1セルとB1セルが一致しないなら……」 という条件にしたいのに、A1参照形式のときにうっかりこれで入れてしまうと、 「RC1セルが空欄ではなく、RC1セルとRC2セルが一致しないなら……」 と、まあ案の定入ってしまうわけです(^_^; こういうのを防ぐために本来はApplication.ReferenceStyleを使って現在の形式を判定し、R1C1参照形式に変更してから入れるようにすれば良いんですが、今回別のブックからデータを引っ張ってくるという手順もあるマクロで、そっちのブックでセル参照と同じ名前を定義してるものがあるらしく、エラーとなって変更することができません。 まあマクロ自体をA1形式で書くようにすればいいじゃないかとも思うんですが、作り的にVBAはR1C1形式で書きたい。 「RC<>RC[1]」と「RC[-1]<>RC」と相対参照にしてA列、B列それぞれに入れる方法もありますが、条件書式が増えるのも気持ち悪いし、何だか負けた気がして嫌(笑) なんとかA1参照形式のままR1C1形式で条件書式をVBAで書き込む方法はないでしょうか? さすがに仕様ということで無理でしょうかね?(^_^;

  • エクセル、Ctrl+Sで保存後、ペーストできない

    1. あるセルを選択 2. Ctrl+Cでコピー 3. Ctrl+Vで別なセルへ貼り付け 4. そこまでの作業を確実に保存しておきたいので、   Ctrl+Sでセーブ。 するとコピー元のセルの点滅が消え、その後また別なセルに 貼り付けようとしても出来なくなってしまうのですが、 これは仕様でしょうか? であれば何のために? Ctrl+Cの後に別な操作が入ったからといって、 クリップボードを空にする必要があるのでしょうか? Ctrl+Sを押したくらいで、空にしなくてもいいじゃん、 と思ってしまうのですが。 設定で変更できたりするのでしょうか? ご助言お願い致します!

  • エクセルVBAの日付の表示で教えてください

    A1セルに「2021年9月5日(日)です」と表示したいのですが、下記のマクロを実行すると「9月04日(木)です」と表示され、日付も曜日も違う結果が表示されてしまいます。 初心者で良く分からないため、マクロに詳しい方、教えていただけないでしょうか。 Sub test() Dim niti As Date niti = "2021/ 9 /5" Range("A1").Value = Month(niti) & "月" & Format(Day(niti), "dd") & "日" & Format(Day(niti), "(aaa)") & "です" End Sub