excel-vba

1熱

1答えて

こんにちは、私はマクロをExcelに新しくしました。構文を書くのにいくつかの困難があります。セルに前月の最後の金曜日を表示したいとします。月曜日のレポート（2014年12月22日）に11月の最後の金曜日（つまり、24/11/2017）の日付がA2と表示されます。誰かが私を助けてくれますか。これを達成するための

2熱

1答えて

代替コマンド（ActiveSheet）

ユーザー定義関数（UDF）があり、ブックのすべてのワークシートにあります。機能が配置されているワークシートはどのように参照できますか？私はThisWorkbook.ActiveSheetを使用していますが、結果は常に変化しています。 Function äëÿñèò(Diapozon As Range) As Long 'äëÿ ñèòóàöèè Application.V

2熱

2答えて

.Find関数を使用するVBA - 最初の値を返さない

概念証明をテストするために、より大きなプログラム用にコードを書きました。メインコードの背後にあるアイデアは、ユーザーがチェックボックス付きのカスタムユーザーフォームを使用して配列を生成し、チェックボックスが選択されたときに "1"のすべての言及をarreyで検索することです。次に、arryの行番号を使用して、どのチェックボックスが選択されたかに基づいて、一連の余分なユーザーフォームをロードします。

0熱

1答えて

テキストエリアのフォント色を変更する

Excelで私はテキストエリアをセルにリンクしました。セルの値に基づいてフォントの色が変化しています。残念ながら、リンクされたセルが変更されると、テキストエリアのフォントの色は変化しません。テキストエリアを開いてEnterキーを押すと色が変わります。これを自動化する方法はありますか？それは、すべての単一のテキストエリアを押してEnterキーを押すことが多すぎるためです。

0熱

1答えて

コードを追加VBA

の機能「と」私はこれを持っています。それ、どうやったら出来るの？ With Sheets("MOV MERCADERIA") For a = 11 To Range("a40").End(xlUp).Row fila = .Range("a1:a65536").Find("").Row .Cells(fila, 1) = [d7] 'remito

0熱

3答えて

ブックを更新する

さまざまなコンピュータで使用されるブックを作成しました。時々私はそれに機能を追加し、私はそれを簡単に更新したいと思います。私は新しいバージョンがあるときはいつでも、それを新しいコンピュータに持ち込み、一時ファイルに保存し、データが保存されているシートをコピーします。私は編集に私の最初のドラフト持っている回答に基づいて：現時点では（私は両方のワークブックを同時にオープンする必要があることを知ら

0熱

1答えて

Excel VBA Webフォームの入力中にウェブサイトのドロップダウンリストからオプションを選択

VBAを使用してこのウェブサイトを自動化しようとしています。私は、ドロップダウンボックスから値を選択する必要がある時点で打たれます。私はVBAには非常に新しく、TISはそのようなプロジェクトです。これは値を選択するためにコーディングしたものです。ここで Sub automaticformfilling_ASDA() Dim ie As Object Set ie = Cre

0熱

1答えて

の検索と複数のページ上のエクセル上の関連する行と戻り値

ありがとう！私はExcelで多くのVBAを使用していないし、私は必要なものを行う方法を解決することはできませんが、私はワークブック内で必要な機能を達成するために必要と信じています。私は特定の情報が存在する場合見つけて、概要ページに表示する必要のある31本のデータ・ページを、持っています。カラムAQに値があるかどうかをチェックする必要がある場合は、その行のE、F、Gカラムに返されたデータが必要で

0熱

2答えて

ピボットテーブルのサブフィールドのセットデータポイントで最も高い数値を取得するにはどうすればよいですか？

添付のスクリーンショットでは、「First Grade」の「Short」の12.50％を取得するためにxを使用しています。しかし、私はこれを拡大して "First Grade"フィールドの中で最大の値を見つけて名前を返したいと考えています。たとえば、「First Grade」では「Tall」になります。 Sub PivotTest() Dim pvt As PivotTable: Se

1熱

3答えて

Excel VBAのすべてのシートで同じ範囲を選択するにはどうすればよいですか？

以下のコードを使用して、選択した範囲のシートを自動ズームします。しかし、私は追加シートがたくさんあるので、どのように名前を書くのではなく、すべてのシートにこのコードを使用することができます。よろしくお願いいたします。コード： Sub Workbook_Open() Sheets("Configuration").Activate Range("A1:AA1").Select Active