ブログ記事8,394件
SaveCopyAsメソッドSaveCopyAsメソッドで、現在開いているブックのコピーを作成して保存することができます。その基本構文は、下記通りとなります。構文Object.SaveCopyAs(Filename)開いているブックのバックアップファイルを作成するSubtest2()DimxlTimeAsStringDimxlNameAsString'ファイル名を取得xlName=T
Collectionで重複しないリストを作成Subtest()'Collectionで重複しないリストを作成DimmyListAsNewCollectionDimiAsLong'エラーの場合次へ進むOnErrorResumeNext'ループでCollectionに要素を追加Fori=2ToCells(Rows.Count,1).End(xlUp).Row
テーブルに設定Subtest()'テーブルに設定DimwsAsWorksheetSetws=ActiveSheetDimtblAsListObjectSettbl=ws.ListObjects.Add(xlSrcRange,ws.Range("B3").CurrentRegion,xlYes)tbl.Name="テーブル1"tbl.TableStyle="TableS
アウトライン(AutoOutling)メソッドは、合計などの数式が設定されている表で、数式の列や行を基準にして自動的にアウトラインを作成する機能です。数式が設定された列や行が表示され、それ以外折りたたむようにアウトラインが作成されます。アウトラインを作成Subtest()’アウトラインを作成Range("A2").AutoOutlineEndSubアウトラインを解除Subtest()’アウトラインを解除Range("
ITパスポートの過去問を解いていて、設問として単語が出てきたり選択肢の一つとして出てきたり、でもそれが一体どの塊なのか分からずに暗記だけしていることが多々。1ヶ月勉強をしてみてやっとなんとなくどこに所属するのかがわかってきました。(おそっ)それをちょっとづつまとめていきます。業務モデリングとは??DFD(DataFlowDiagram)とかER図(EntityRelationshipDiagram)とかUML(UnifiedModelingLanguag
配列でデータを高速抽出Subtest()'配列でデータを高速抽出Dimi,jAsLongDimA'元データを配列Aに代入A=Range("A1:D"&Cells(Rows.Count,"A").End(xlUp).Row)DimB'出力結果を格納する配列を設定ReDimB(1ToUBound(A,1),1To4)j=0
実務では、大量のデータを絞り込むには、オートフィルタがとても便利です。今日は、色で絞り込む方法を見てみましょう。セル背景色で絞り込む構文Range.AutoFilterField,Criteria1,OperatorCriteria1にRGB色を指定し、Operatorにフォントか背景かを指定するSubtest()'テープルのA列が「水色」塗りだけを抽出するRange("A1").AutoFilter1,RGB(0,255,
※この中で表示している数値は、当センター設備によるものです※こんにちわ|ω・`)ノヤァいつもご覧いただきありがとうございます。「トミックス車両ケースジャケット製作」の続きです。ベース枠の外側が決まりましたので、今度は「背面部」「インデックス部」の寸法出しですね。「高さ」は145mmと出ていますので、それぞれの「幅」を計測します。。。背面部:幅65mm、インデックス部:幅30mmでした。背面部から配置します。。。挿入→図形→正方形/長方形
こんにちはご覧頂きありがとうございますmydeteアラフォー5歳と11歳の男の子がいます身長:160㎝足のサイズ:23.5㎝肌:ブルべ(多分)上半身細目下半身ガッチリ。肩幅広めです20年以上振りの就活(パート)をしているアラフォーよぴです就活記録①『【アラフォーおかん】約20年ぶりの就活で慌てふためく。汗【しまパト】必要に迫られて購入したもの。』こんばんは
2022/3/22新規投稿後日、データ追記整理等予定2022/4/10勝率データまとめ2件などを追加しました①はじめに「いろはに愛姫」で実践記録100万G到達しました道中、オカルトに振り回されながらも苦しい状況になりながらもExcelに記録し続けることで「勝てる」「増やせる」「楽しめる」とは何かを見えた気もします低貸しとはいえバカにならない収支も出ました実践はまだ続けるつもりですが今回はキリのいいところで公表します②データいろいろ総G数10
前回のパワーパイプの写真でもお気付きの方もいるかとは思いますがタイヤ・ホイール(リム)も交換しました。まずはリムを交換するので、スポークも張り直してもらうので、せっかくですので前後のハブ関係もお色直し(^ω^)パウダーコートの半ツヤブラックに続いてスポークを組んでもらうのですが実は今回、エキセルリムで前後異径のフロント:19インチ(19×2.15)リア:17インチ(17×3.5)にするにあたり…リアは問題ないのですがフロントが…19インチにするにあたり、現行のハブで
FileSystemObjectでフォルダー内ファイルの更新日時を一括取得Subtest()’FileSystemObjectでフォルダー内ファイルの更新日時を一括取得DimFolderPathAsStringDimFSOAsObjectDimFileNameAsObjectDimFileTimeAsStringDimfileName2AsString'ファイルシステムオブジェクトをセットするSet
こんばんは!プチプラメイクプランナーのcoconです今日は待望のチークが登場したよ!excel\オーラティックブラッシュ/全色レビューぜひ最後までチェックしてくださいね!それではさっそく参りましょう!excel(エクセル)オーラティックブラッシュ全5色1,800円(税抜)excel(エクセル)オーラティックブラッシュAB04(シャイガール)チークAB04シャイガール8g1,980円Amazonエクセルの新作チークは、しっとりふんわり美発色
「鬼滅の刃」の鬼退治をする「鬼殺隊」の階級は、陰陽五行説(いんようごぎょうせつ)の十干(じっかん)になってるんですね。主人公の炭治郎の階級は一番下の「みずのと」からスタートしましたね。その後「かのと」とか「ひのえ」に昇格して行きます。陰陽五行説とかいうと、なんだかとても難しそうに感じますが、日本人はよく使い慣れてると思います。曜日や惑星の名前にも使われている「木火土金水」が五行ですね。これに太陽と月を付け足したのが曜日です。万物はこの5つから出来ているという、古代中国の思想です。これに、全ての
おはよございます✨kouです🌹先週土曜日にMOS365Wordの試験が無事に終わりました結果は…「合格」🌸良かった…本当に…良かった…ひとまずは一つクリアできた…良かった…一人でこの喜びをかみしめております🤣🤣何かをやり切る事がなかったので少し自信がつきました✨次はExcelです💦私には難題ですがまた頑張ります😊ここで宣言して取り組んでまいります行ってきます✨
さてさて。日能研公開模試の結果を振り返ってみました入塾して最初に受けた模試では42でした算数39!『入塾時の偏差値』2023年1月の入試に向けて小5長男母のブログです日能研に小4春から通っています見ます?笑ドン引きしますよ小4で入塾してすぐ受けた初めての公開模試の…ameblo.jpその後の学年毎の平均偏差値です↓(3科目※4年時は2科目のみ受講)4年:52(計7回)最高58最低445年:55(計10回)最高59最低536年:57(計11回)最高60最低
複数シートをコピーして別ブックへ保存するSubTest()'複数シートを新しいブックへコピーThisWorkbook.Worksheets(Array("4月","5月")).Copy'新しく作成したブックを名前を付けて保存ActiveWorkbook.SaveAsFilename:=ThisWorkbook.Path&"\新在庫管理表.xlsx"'新しく作成したブックを閉じる
Excelで2列を比較して、数字が大きければ、色を変えたい時のルールの設定色を付けたいセル列の位置で「先頭以外」を全選択しておく。条件付き書式⇒新しいルール⇒数式を使用して、書式設定するセルを決定を選択。適用先:【先頭以外】を全選択する。(例:$A$2:$A$1048576)数式:AND($A2<>"",$B2>$A2,B2<>"-")書式:ぬりつぶし赤今回の条件を以下に説明します。①約A2のセルが空白以外(何かセルに入っている)のところで、②B2と比較して、B2が大きい時
今となっては懐かしき甲虫王者ムシキング昔はすごいやっていて大会まで出て、チャンピオンカードも買った思い出(意外と高い)そして、今更ながら熱が再発しまして色々調べたらエミュが出来ると分かって現在稼働出来るようにはなってます。で、そこで問題なのがムシキングカードの選別やろうと思えば家のどこかにあるほぼ全てのムシキングカードを読み込んで、リスト化してやる方法もあるのですが、いかせんめんどい(探すのが)なので私は既にリスト化してあるサイトからカードのバーコードを取っ
以前、Filter関数の話を書いた。Excelで「入力されているデータから一つを選択する」場合に、入力規則でリストを指定することがよく行われる。これはリストにないデータを入力することがないようにするためだ。この場合「ドロップダウンリストから選択する」にチェックを入れてリストから選ぶようにすることが多い。しかし、リストが長くなると選ぶのが大変になる。直接入力も可能であるが、下の例だと(株)などを正確に入力する必要があり現実的ではない。図リストから選択する例実際に作ったものは出せないの
もしかしたら作りたい人が居るかな?と思って…φ(..)メモメモ簡単な概要としては一覧表にランダム数を割り振り、それを大きい順に並び替えたときの番号を問題番号として、たまたま1番大きい数字だったものが問題番号1になる、という感じです。ランダム数は開く度、F10を押す度に更新されるので、何枚でもプリント問題ができるというものです。たった3つの関数しか使ってないので簡単に作れます★Excel関数使ったことなかったらどことどこの数字入れ替えればいいのか、全然分からないかもしれません😥
こんにちはご覧頂きありがとうございますmydeteアラフォー5歳と11歳の男の子がいます身長:160㎝足のサイズ:23.5㎝肌:ブルべ(多分)上半身細目下半身ガッチリ。肩幅広めです朝におススメの食べ物系載せてます。また見て頂けたら嬉しいです『【楽天スーパーセール】明日はポイント5倍day!我が家の鬼リピおススメアイテム♪』おはようございますご覧頂きありがとうございます
いけだいけみです。流されやすく計画性がなくあきらめが早く、日々適当に生きる30代です。シングルマザーで息子と暮らしています。20代後半で会社をなんとなく辞めて無職になった時のことを描こうとブログを始め、現在は日々の出来事やら会社時代のことやら思い出話やら、ノージャンルな話をダラダラゆるゆる漫画やイラストで描いています。はじめましての方はこちらからどうぞ。就職祝いにこの本をそっと添えてプレゼントしたら、半年後ぐらいにめちゃくちゃ感謝されるんじゃないかと思います。
人に教えることが好きだから、今後は人に教える機会を増やしていこうと考えている。↓前のブログ記事。『【白身と黄身】人に教えることが好き』これまでの人生で人に教える機会は少なかったけど、その少ない経験の中で、人に教えるのって楽しいな~と思っていた人をやる気にさせたり人の能力を伸ばしたりすることや…ameblo.jp前のブログ記事で、親戚から教えて欲しいと頼まれたと書いていたけど、仕事が忙しいらしく、まだ予定が決まっていないので始まっていない。予定が決まる前に準備できることをしておこうと思っ
Space関数で一定数の空白を追加Subtest1()’Space関数で一定数の空白を追加MsgBox"|"&Space(5)&"|:5スペース分"EndSub構文Space(数値)実行結果Subtest2()’Space関数で数字ピラミッド作成DimiAsLongDimnAsLongDimxlCntAsLongDimMyStrAsString
FileDateTime関数でファイルの更新日時を取得Subtest()’FileDateTime関数でファイルの更新日時を取得DimmyFileTimeAsDatemyFileTime=FileDateTime("D:\Datebank\test\Sample01.xlsx")Debug.PrintmyFileTimeEndSub実行結果FileDateTime構文:FileDateTime(PathName)
非表示の行・列があるかを判定Subtest()IfCells.SpecialCells(xlCellTypeVisible).Areas.Count>1ThenMsgBox"非表示の列があります。",vbInformationEndIfEndSub実行結果通常、非表示の行・列がない場合、セル全体に可視セルを取得すると、セル範囲は1つだけです。一方、非表示行・列がある時、セル全体が
家計簿再開家計簿は、仕事で疲弊していた2年位を除いて結婚以来ざっくりつけていましたが、今回しっかり家計把握の為にEXCELの表を少し変更しました◆家計簿(EXCEL表)の見直し点◆・科目の見直し・入力シートのシンプル化・支払区分(現金・カードの種類)削除・ピボットテーブル(集計表)追加◆見直し後の科目◆・食費の内訳(小区分)が細かいのは、夫が・栄養ドリンク・ヤクルト、豆乳などの飲料・ジュース・養命酒・ミネラルウォーター・コーヒー・アルコール等(多すぎでしょ・