ブログ記事9,334件
自分がまだ会社員時代に躍起になって起業する方法を探してた時代に知りたかった事1.恐怖心は全て自分の無知から来るもの。特に詳しくわからない先にあるよく聞く不安が人間怖くてたまらないまぁ当たり前なんだけど貴方がもし10年後に必ず大病になると知っていたら、それに全力で備えるだろう。逆に、10年間絶対病気にならないと知っていたら貴方は生命保険なんか契約しないだろう。オチは違えど、知っていると対策出来るし悪い方への恐怖はあるけどもまた違う話しだよね。起業も実は似てたりする。まず、
RGBとは、色の表現方式の一つで、赤(Red)、緑(Green)、青(Blue)の配合比率を変化させて、すべての色を表現する方式です。Excelでは、RGB関数を使ってセルの背景色など色を指定することが多いです。今日は、セルの背景色などを、RGB形式で取得する方法を見てみましょう。セルの背景色(RGB)を取得するSubtest()’セルの背景色(RGB)を取得するDimmyRAsLongDimmyGAsLongDimmyB
改正戸籍法が、来年3月1日から施行されるので、下記のブログの情報をアップデートしたいと思います。『性別変更手続きで意外と手間のかかる戸籍の取り寄せ』出来たら性別適合手術前に可能な限り事前準備をしておくと楽です。その理由はしばらく安静にしておかなければいけない場合があるからです。社会保険関係ですが、会社…ameblo.jp今までは戸籍を本籍地のある自治体に直接行くか郵送手続きをするしか取得しようがありませんでしたが、来年3月からは手続きが大分楽になります。戸籍とマイナンバーが
ホテルにいます。僕はベッドに1人きりです。あのぉ‥桜子さん‥LeDzx美顔器【2023新登場最新冷感エステ技術】美容器自宅用美顔器RF美顔器EMS微電流冷感機能LED1台多役6種類モード3段階レベルイオン導出イオン導入4色光エステ目元ケア肌ケア口元ケア温冷ケアUSB多機能男女兼用ギフト日本語取扱説明書付きAmazon(アマゾン)『ホテルに来てセック◯もせず、マッサージチェアで疲れほぐすのやめてくれませんか?』あと少しで、チェック
アウトライン(AutoOutling)メソッドは、合計などの数式が設定されている表で、数式の列や行を基準にして自動的にアウトラインを作成する機能です。数式が設定された列や行が表示され、それ以外折りたたむようにアウトラインが作成されます。アウトラインを作成Subtest()’アウトラインを作成Range("A2").AutoOutlineEndSubアウトラインを解除Subtest()’アウトラインを解除Range("
ブログ訪問ありがとうございます今日もどんよりとした空模様でスッキリしませんでしたね連休明けでまだ体がお休みモード…ではいけませんので本日も切り替えて各自業務に取り組まれましたマニュアル作成鈴木ハーブ研究所様で化粧品の梱包作業Amazonの梱包作業を行っています初めてこの作業を行う方のために数年、梱包作業を行っている利用者さんがマニュアルを作成して下さいました内容を少しご紹介しますねマニュアル作成には目的があります
誰でも気軽に利用できる公共シェアサイクル「まちのり」をご提案いたします。「まちのり」とは、複数のサイクルポートのどこでも借りられて、どこでも返せる公共シェアサイクルサービスです。サイクルポートは、松江新庁舎はもちろん、中心市街地や周辺エリアにも多数設置します。松江市が抱える課題の一つとして、自家用車での通勤の割合が73.7%と、全国平均46.5%に比べ非常に多く、自家用車への依存が高い事が挙げられます。シェアサイクルを導入する事によって、市中心部における回遊性向上や、交通渋滞を緩和させる
桜子さんはよく−僕の将来のため−とか言います。そして、僕がいつか誰かと付き合う時や結婚する時を想定して、◯◯しておくといいからとアドバイスして来ます。ウール混ハウンドトゥースフリンジスカート・p001357レディース【sk】ボトムススカートロング丈ハイウエストタイトウール混ハウンドトゥースフリンジスリムスリットヘムオフィスカジュアルOLモード冬韓国ファッションMKT楽天市場${EVENT_LABEL_01_TEXT}あの‥【送料無料】≪
おしらせ!更新頻度下がります!目標は1日おきくらい閲覧ありがとうございます。こちらはマンデラエフェクトという現象に犯されている人間のブログです。基本的にブチギレているか助けを求めています。マンデラエフェクト(マンデラ効果)とは事実と異なる記憶を不特的多数の人が共有している現象を指すインターネットスラング、およびその原因を超常現象や陰謀論として解釈する都市伝説の総称であるwikiより・こちらご一読くださいはじめに・よく読まれてるやつ世界地図が変わった…助けて。
我が国の社会インフラは高度経済成長期に集中的に整備され、建設後50年以上経過する施設の割合が今後加速度的に高くなる見込みであり、急速な老朽化に伴う不具合の顕在化が懸念されている。また、高度経済成長期と比べて、わが国の社会・経済情勢も大きく変化している。こうした状況下で、社会インフラの整備によってもたらされる恩恵を次世代へも確実に継承するためには、戦略的なメンテナンスが必要不可欠であることを踏まえ、以下の問いに答えよ。(1)社会・経済情勢が変化する中、老朽化する社会インフラの戦略的なメ
育児に仕事にフル回転だった頃。兎にも角にも、優先すべきは効率化。「いかに、時間を生み出すか」「いかに、効率よく家事をするか」それが、大事でした。家族との時間を生み出すために、家電や便利グッズを使い、なんとか皿回しをする。そういう生活です。その時に、覚えた効率よく暮らす方法は、とても有用だったなぁと思います。そして、現在。娘は自立しましたし、夫と二人暮らしの生活。私は仕事しているけれど、フリーランスとして。生活は一変。
投資に限らず、実際やった自らの行動は合理的なのかどうか、を後になって考えることはしばしばあります。投資についても思い付きに近い感じで実行した後で、改めてできるだけ論理的に考えてみて思い付きの正しさを確認、もしくは「間違ってそう」ということで修正したりはやりがちですが、そんな思考を今回も……(;^_^A多少利息が付くようになりつつあるとはいえ、債権と比しても相対的に期待リターンの小さい現預金をポートフォリオに組み込む意味があるのだろうかと考えてみました。なお、ここでいう現預金
配列数式の入力Subtest1()'各行の金額Range("D4:D23")="=C4*B4"'配列数式による全体合計を取得Range("D2").FormulaArray="=SUM(B4:B23*C4:C23)"EndSub実行結果――――――――――→ExcelVBA基礎入門もくじへ戻る参考記事『VBAセルに数式を入力・取得』セルに数式を入力す
Killステートメントで自身のファイルを削除Subtest()’Killステートメントで自身のフアイルを削除WithThisWorkbook.Saved=True.ChangeFileAccessxlReadOnlyKill.FullName.CloseEndWithEndSub――――――――――→ExcelVBA基礎入門もくじへ戻る
AutoFillメソッドによる曜日一括入力Subtest()’AutoFillメソッドによる曜日一括入力(数式を一切利用せずWithRange("A2").Value="2024/4/16"’任意の日付を入れる.AutoFillDestination:=Range("A2:A31").Offset(,1)="火"’上記日付に対応する曜日を入れる
こんにちは!!東大阪病院看護部業務改善委員のOです今年度より業務改善委員会の委員長をつとめさせていただいています当院の看護部にはいろいろな委員会があります。↓その中の業務改善委員会では、看護師や介護士の業務負担を軽減し、働きやすい環境を作るために月に1回委員会を開催し、活動しています。業務改善をすることは、スタッフの働きやすさにも影響し、業務の効率化や問題解決に取り組むことでスタッフの不安や負担が軽減され、スタッフのモチベーションが向上し、安全で質の高いケアの提供につなが
複数列を一括重複削除Subtest()’複数列データを一括重複削除ActiveCell.CurrentRegion.SelectSelection.RemoveDuplicatesColumns:=_Array(1,2,3,4),Header:=xlYesEndSubArray(1,2,3,4)は、4列ともに重複する場合、それを削除する。1列と3列だけ重複する場合、Array(1,3)にすれば良いです
FileSystemObjectでフォルダー内ファイルの更新日時を一括取得Subtest()’FileSystemObjectでフォルダー内ファイルの更新日時を一括取得DimFolderPathAsStringDimFSOAsObjectDimFileNameAsObjectDimFileTimeAsStringDimfileName2AsString'ファイルシステムオブジェクトをセットするSet
1.導入されるAI、IT技術の種類不動産賃貸業界では、様々なAIやIT技術が導入されています。その中でも代表的なものには以下のようなものがあります:AIチャットボットや顧客管理システム:オンライン上での顧客対応や問い合わせ対応を自動化するためのシステムです。顧客の疑問や問題をAIが素早く解決し、顧客サポートの負担を軽減します。データ分析や予測モデルの活用:不動産市場の動向や顧客のニーズを分析し、将来のトレンドや需要予測を行うための技術です。これにより、より効果的なマーケティングや物件
複数シートをコピーして別ブックへ保存するSubTest()'複数シートを新しいブックへコピーThisWorkbook.Worksheets(Array("4月","5月")).Copy'新しく作成したブックを名前を付けて保存ActiveWorkbook.SaveAsFilename:=ThisWorkbook.Path&"\新在庫管理表.xlsx"'新しく作成したブックを閉じる
焼き鳥はなぜ串に刺してあるのか?食べやすいから?YouTubeでやっていました。それも有りますが、他にも有ると生産性が上がるからってヤツ受注生産だった車をフォードは規格品のT型フォードを製造する事で大量生産して安く売る方式で大儲け!焼き鳥も同じで、受注生産ではなく多品種規格品化して安価で多売を狙いやすい下拵えで鶏肉を串に刺す事で、大きさの均一化と規格外品の排除が効率化する焼き時間も均一化するネギを刺したり椎茸を刺したりして、新商品の開発が容易ミニトマトを刺したりして焼いている店
テーブル(ListObjects)配列で最終行へデータを貼り付けるSubtest()’配列でデータを貼り付けるDimArryArry=Range("E6").CurrentRegionWithRange("A1").ListObject.ShowTotals=FalseDimnAsLongn=.ListColumns(1).Rang
ファイルをコピーするSubtest()’ファイルをコピーするFileCopy"D:\test\B\A_210720-2.docx","D:\test\B\A_210720-2B.docx"EndSub実行結果コードのなか赤文字のところは、コピーもとのフルファイル名です。これに対して、青字のところは、コピー先のフルファイル名です。同じフォルダーにファイルをコピーする際、ファイル名を変更することが必要です。しない場合、もちろんエラーが出ます。それ
名前の定義の削除Subtest()’名前の定義の削除’test1という名前を定義Sheets(1).Range("E1:G10").Name="test1"'単独の名前の定義の削除Range("test1").name.DeleteEndSub名前定義の一括削除Subtest2()'名前定義の一括削除DimxlNamAsname'エラーになったら無視して次進む
Array関数によるシートグループ化Subtest()’Sheet1とSheet3グループ化する(同時選択状態)Sheets(Array("Sheet1","Sheet3")).SelectEndSub実行結果全てのシートを選択するSubtest2()’全シートをグループ化する(同時選択状態)Sheets.SelectEndSub実行結果SelectメソッドSubte
テーブルの有無確認Subtest()'テーブル有無確認DimWSAsWorksheetSetWS=ActiveSheetIfWS.ListObjects.Count>0ThenMsgBox"テーブルあり"EndIfEndSubテーブルの個数確認Subtest2()'テーブルの個数確認DimWSAsWork
実務上では、たくさんあるシート名を、一括で取得したり、変更したりすることがあります。今日は、そのやり方を見てみましょう。シート名の一括取得Subtest()’シート名を一括取得DimiAsIntegerFori=1ToWorksheets.Count’シート名をセルB列に代入Cells(i,2).Value=Sheets(i).NameNextEndSubシート名の一括変更
テーブル(ListObjects)へデータを貼り付けるSubtest()’テーブルへデータを貼り付けるWithRange("A1").ListObject.ShowTotals=FalseDimnAsLongn=.ListColumns(1).Range.Count+1Range("E6").CurrentRegion.Copy
フィルターしたデータを別シートへコピペSubtest()’フィルターしたデータを別シートへコピペ(見出し無し)DimmyRAsLongmyR=2’貼り付け先行番WithSheets(1).Range("A2").ListObject.Range.AutoFilter2,"青".ListColumns(1).DataBodyRange.Copy
こんばんは、澤田英語学院のMattです。日本では、ネットショッピングが主流の買い物の仕方になってきていると思います。それを支えているのが、物流業界です。しかし、人材不足により、トラック運転手の体調不備やそれによる事故も増えてきました。そこで、政府が動いて、働き方改革の規制が開始されました。英検の準1級や1級にでる頻出トピックなので、一緒に見ていきましょう。物流の2024年問題求められる運送改革トラックドライバーの長時間労働を防