2016-10-28 6 views
-2

VBAでIFステートメントを使用してセル内の特定の数値と値を書き出すには、適切な書式設定と構造が必要です。VBAで "If"ステートメントまたはコマンドを使用する

私はコーディングで何らかの形でゼロを経験しているので、上記の言葉遣いはナンセンスになる可能性があります。だから私はちょっとだけ私が必要とするものを説明します。

一度に1行で動作するマクロを使用して、パーセントに基づいて文字の等級を割り当てる必要があります。したがって%が73.5の場合は、マクロで割り当てたキーボードショートカットを使用し、%が何であってもその作業を行うと、その横のセルに "C"と表示する必要があります。

+4

このチュートリアルサイトではありません。私たちはコード作成サービスではありません。任意の数のVBAチュートリアルを検索するために検索することができます。また、IF ELSEの適切な使用方法を示すVBAに関する既存の投稿がたくさんあります。 –

+0

これにはVBAは必要ありません。 '= IF(D2> 99、" A "、IF(D2 <60、" F "、CHAR(75-(D2 + 1)/ 10)))のようなもので十分でしょう。 – Comintern

+1

Googleが[if then else vba](https://msdn.microsoft.com/en-us/library/752y8abs.aspx)のときに最初の検索が返されました。最初の検索は、私がGoogle [それ以外の場合は数式を効率的にする](https://www.techonthenet.com/excel/formulas/if_nested.php)がチュートリアルのように見えるときに返されます。 :/ – Tyeler

答えて

-2

あなたがここに

  1. ループ物事のカップルが必要になります私は、私は「もし/次に/ ELSEIF」形式を使用する必要が知っているが、私は単純に適切にコマンドを入力する方法を見つけ出すことはできません

    For Each testCell in Sheets("Sheet1").Range("A1:A20").Cells 
        If testCell.value > .70 AND testCell.value < .80 Then 
         testCell.Offset(,1).value = "C" 
        ElseIf testCell.value > .60 AND testCell.value < .70 Then 
         testCell.Offset(,1).value = "D" 
        <and on and on to capture each of your potential grades> 
        End IF 
    Next testCell 
    
    0123:それはのようになります

意思決定を行うためにif文やケースあなたは

  • アンをテストすることをあなたの細胞を反復処理

    そのtestCellは、範囲Sheets("Sheet1").Range("A1:A20"). One cell at a time, 20 times total as it loops. Each time it is tested by the IF statement and a value is written out in the cell one column over using theオフセット(、1) `内の各セルの値が割り当てられる変数です。

    しかし、Index()とMatchを使用してこれを管理すると、vbaで猿を使う必要がなくなります。これを行うには、別のシート(シート2)でのようなもののテーブルを作る:

    enter image description here

    をそして、あなたの番号グレードと仮定するとA1である、あなたは次の式を使用することができます。

    =INDEX(Sheet2!$B$1:$B$5,MATCH(A1, Sheet2!$A$1:$A$5,1)) 
    
  • 関連する問題