chevron_left

メインカテゴリーを選択しなおす

cancel
これからの暮らしのためにできること。1.資格<What can I do for a future?> https://khcoram.livedoor.blog/

内容としては、「旅行」「ガーデニング」「創作」「食べ物」「食事」「資格勉強」「書籍」です! 気になるコンテンツがございましたら、どうぞ末永くお付き合いください。

nickname
フォロー
住所
未設定
出身
未設定
ブログ村参加

2020/05/23

arrow_drop_down
  • VBA code 画像の一斉貼り付け

    Sub 画像一斉貼り付け()Dim top As Long’入力位置のスタート地点Dim objFile As Object’高速化のためDim objFldr As VariantDim spanStr As StringDim span As Long’画像の感覚を決めているDim dlg As FileDialogDim folderPath As String’貼り付けデータの取得に使うDim

  • VBA code ヒストグラム系

    Sub ヒストグラムの編集()'' ヒストグラムの編集 Macro''Dim i As LongDim EndCol As LongDim trgtSht As StringDim trgtCol As StringtrgtSht = InputBox("ヒストグラムを作成したいシート名称を入力してください")trgtCol = InputBox("貼付け先のセルの列をアルファベット

  • VBA code 行の追加

    Sub MultiInsrtRow()    Dim InsrtEndRow As Long    Dim InsrtRow As Long    Dim i As Long    Dim AddCnt As Long                AddCnt = InputBox(Prompt:="追加する行数を入力してください。", Default:=1)        With ActiveSheet     

  • VBA code エクセル グラフ X軸変更

    Sub changeGraphScale()    Dim cht As ChartObject    For Each cht In Selection'        MsgBox cht.Name        cht.Chart.Axes(xlCategory).MinimumScale = 0    'x軸の最小値を変更        cht.Chart.Axes(xlCategory).MaximumScale = 10   'x軸の

  • VBA code データの抽出_閾値30

    Sub データの抽出_閾値30()        Dim trgtColumn As Long    Dim EndRow As Long    Dim strFlg As String, sngTol as single    Dim i As Long            Cells(92, 3).Activate    trgtColumn = ActiveCell.Column    EndRow = ActiveCell.End(x

  • VBA code データの桁数統一

    ’=======================Option ExplicitSub ChangeOrder()    Dim strTemp As String Dim strOrder as string     strOrder = inputbox("桁数を入力してください。例:0.000", default:=0.000"    strTemp = Format(Selection.Value, st

  • VBA code グローバル変数(新しいシートの作成、開始行と終了行の決定、まとめシートへの転記、数式の入力、まとめシートの体裁調整、データ範囲の作成、頻度関数の入力)

    最近覚えたこととしては、Global変数これを使えると変数の共有が便利です!!Option ExplicitPublic StrtRow As Long, EndRow As Long, EndCol As LongPublic slctRow As Long, slctCol As LongPublic lngRow As Long, lngCol As Long, j As LongPublic SrcWs As String, Dst

  • VBA code 絶対参照⇒相対参照 VBAコード 例

    久しぶりの投稿です緊張しますね(;´∀`)さて覚書続きですSub 絶対参照⇒相対参照()'' 絶対参照⇒相対参照 Macro''    '円相当径の相対参照化    Range(Cells(3, "B"), Cells(3, "B").End(xlToRight)).Select    Selection.Replace What:="$", Replacement:="", LookA

arrow_drop_down

ブログリーダー」を活用して、nicknameさんをフォローしませんか?

ハンドル名
nicknameさん
ブログタイトル
これからの暮らしのためにできること。1.資格<What can I do for a future?>
フォロー
これからの暮らしのためにできること。1.資格<What can I do for a future?>

にほんブログ村 カテゴリー一覧

商用