• ベストアンサー

ExcelのVBAのテクニック

ExcelのVBAを3時間前位から使い始めました。矩形波のフーリエ級数展開の式を項数nを変化させたときのグラフのプログラムを作っています。n,xがある値の時のｙの値を出力できるところまでできたのですが、n,xを変化させたときのｙの出力の簡単な方法はないでしょうか？配列にn,xの値を代入すればできるのかもしれませんが、Excelのふつうの関数のようにセルを相対参照させて、フィルを使うようにはできないでしょうか？誰か知っていたら教えてください！

質問者が選んだベストアンサー

  • ベストアンサー
  • benelli
  • ベストアンサー率51% (78/152)
回答No.1

VBAで標準モジュールを作成し、以下のように入力する。 '----------------------- Function abcde(n, x) y = n + x 'この行のような計算式は好きに変えてください、 abcde = y End Function '----------------------- 次に、エクセルの好きなセルに以下の公式を書き込んでみる。 =abcde(3,5) すると８が帰ってきます。 上記の一連の流れを応用すればひとまず理想としていることはできるかと思います。 勉強初期はたいへんでしょうけど、ぜひがんばってください。

Problemest
質問者

お礼

ありがとうございました!ユーザー関数定義というのがあるんですね、 うまく結果が得られました!

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Visual Basic

関連するQ&A

  • フーリエ変換の問題点

    実はレポートで調べ物をしているのですが、どうしてもよく分からないので質問します。 フーリエ級数展開についてなのですが、例えば矩形波f(x)=-1(-π<x<0),1(0<x<π)でのフーリエ級数展開はf(x)=4/π(Sinx+1/3Sin3x+・・・)ですが、この二つをグラフに出力した場合、うまく近似できる所とできない所がありますが、（なだらかな変化の所ではいいが、急な変化の場所ではうまく近似できない）これは”OOO（人名）のOOO”という。 という定理の名前みたいな物を探しているんですが、誰かお知りの方がいらっしゃったら教えていただけませんか？ 内容は調べるので名前だけ教えてください。 よろしくお願いします。

  • フーリエ級数からゼータ関数

    フーリエ級数について勉強していて、疑問に思った事がありました。 まず、ｙ＝ｘ^2（-π≦ｘ≦π）をフーリエ変換して、 x^2－(π^2)/3＝４(－cosx＋(cos2x)/4－(cos3x)/9＋(cos4x)/16……) という級数を得ました。これにｘ＝πを代入すると、ζ(２)＝(π^2)/6 というゼータ関数の公式を得る事ができます。 また、この両辺を微分して、 ２ｘ＝４(sinx－(sin2x)/2＋(sin3x)/3－(sin4x)/4……) となるので、ｘ＝π/2を代入すると、 π/4＝１－１/３＋１/５＋１/７…… というグレゴリーの公式を得ることになります。ここまでは納得できました。 今度は、x^2－(π^2)/3＝…の両辺を４回微分します。すると、 ０＝４(－cosx＋4cos2x－9cos3x＋16cos4x……) となるので、ｘ＝πを代入すると、 Ｏ＝４(１＋４＋９＋１６……) ⇔Ｏ＝１＋４＋９＋１６…… となります。これを見た瞬間におかしいと思ったのですが、これはちょうどゼータ関数の公式に一致します。この式は、ゼータ関数を複素関数として解析接続をして得られるそうなのですが、このような、フーリエ級数表示して両辺を微分する、という導き方は正当なのもなのでしょうか。 仮にこの導き方が正しいをすると、さらに偶数回の微分を繰り返して、 ζ(2n)＝０（ｎは負整数） という結果が導けるのですが、ゼータ関数の値がこんな簡単に導けるものなのでしょうか。

  • フーリエ級数の問題です。

    フーリエ級数の問題です。 （１）、αはZの要素ではないとする。ｆ（ｘ）は周期２πの関数で、ｆ（ｘ）＝cosαｘ、（－π＜ｘ≦π）を満たすとする。R上でフーリエ級数に展開せよ。 （２）、得られたフーリエ級数にｘ＝０を代入し、１/sinπαをあらわす級数をもとめよ。また、得られたフーリエ級数にｘ＝πを代入して、１/tanπαｘをあらわす級数をもとめよ。（どちらとも、部分分数分解） よろしくお願いします。

  • フーリエ級数の問題です

    f(x)= x (-π<= x <=π) のフーリエ級数を用いて無限級数和 　　　　　　　　　　 (1) Σ[n=1～∞] Σ 1/n^2 (2) Σ[n=1～∞] (-1)^n/n^2 　　　　　　 を求めよという問題ですが、フーリエ級数は求められて 　　　　　 f(x)= 　 2Σ[n=1～∞] {(-1)^n+1}*sin(nx)/n 　　　　　 になるけれど、ｘに何を代入すればいいかわかりません。御回答よろしくお願いします。

  • フーリエ級数の問題です。

    フーリエ級数の問題です。 １．ｆは周期２πの関数で次を満たす。f(x)=０(-π<x≦0)or　f(x)=x(0<x≦π) （１）ｆをフーリエ級数展開し、各点収束定理を用いて収束を調べよ。 （２）ｘ＝π/2を代入してπの値を求める級数を作れ。 よろしくお願いします。

  • エクセルでのフーリエ解析について

    ある実験データをエクセルのフーリエ解析ツールで解析したのですが、 出てきた複素数の値をどのような式にあてはめれば、 フーリエ級数を求められるのでしょうか？ ※ＦＦＴでフーリエ級数を求めて、データ間の補間に使用したいと考えています。参考書などを見ても、パワースペクトルを求めるところまでしか書ていないので・・・

  • フーリエの問題です

    周期がある一定の割合で変化していく（例えば、低周波から高周波へ）矩形波を、フーリエ級数展開orフーリエ変換することって可能ですか？ もし可能なら、どのようにするか教えていただきたいです。 よろしくお願いします。

  • フーリエ級数

    フーリエ級数の問題について教えてください！ f(x)=x(o≦x<π),0(-π≦x<o) この時f(x)のフーリエ級数展開は、 π/4+1/πΣ[∞,n=1]{(-1)^n-1}cos(nx)/n^2-Σ[∞,n=1]{(-1)^n}sin(nx)/n となる。 この式をF(x)としたとき、 (1) F(π)とF(0)とF(-π)を求めよ。 また、X=Σ[∞,x=0]1/(2n+1)^4、Y=Σ[∞,x=1]1/n^2としたとき (2) 1/π∫[-π→π]｜f(x)｜^2を求め、さらにこれをXとYを使って表せ。 上の２題、よろしくお願いします＞＜

  • Excel VBA セル値の配列代入について

    Excel VBAで、セルの値を配列に代入する処理を、よくやります。 arr=Range("$A1:$C1000").value とかですね。これに関して、オートフィルタで絞り込んだ結果の可視セルだけを、配列に代入するということは、やっぱり出来ないのでしょうか。

  • フーリエ級数の問題で、f(x)は関数|x|(-π<x<π)で同期2πで

    フーリエ級数の問題で、f(x)は関数|x|(-π<x<π)で同期2πで拡張したものとする。f(x)のフーリエ級数を求めよという問題が分かりません。 b_n(下付き文字)が0になるのは分かるんですが、a_nはどうなるのでしょうか？

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する