yakiudon08のプロフィール

@yakiudon08 yakiudon08
ありがとう数3
質問数1
回答数2
ベストアンサー数
1
ベストアンサー率
100%
お礼率
100%

  • 登録日2007/08/21
  • 数列の質問です。

    下記のような数列があります。 15, 17, 19, 22, 25, 28, 32, 36, 41.... この数列では 第2項 = (34 * 初項 / 30)を小数点以下四捨五入した数 第3項 = (34 * 第2項 / 30)を小数点以下四捨五入した数 第4項 = (34 * 第3項 / 30)を小数点以下四捨五入した数 というような法則があります。 ※ちなみに、プログラム(objective-c)にて小数点以下の四捨五入はやってくれます。 このとき項数nを用いて、各項の値を求めたいのですが、どのように求めれば良いでしょうか? 文章が拙くて申し訳御座いませんが、この数列のうちnを用いた上昇率が知りたいです。 宜しくお願い致します。

  • VBAでカンマ区切り数値をハイフンでまとめたい

    以前、下記の質問をさせていただきました。 エクセルでハイフンで示した数値の範囲を別々の数値へ http://okwave.jp/qa/q8192454.html これの逆をやりたいと思い、下記のように改造してみました。 例:1,2,3,5,7,8,9,10,12→1-3,5,7-10,12 しかし#VALUE!になってしまいます。 どこがおかしいのか色々試してみましたが、分かりません。 どなたかご教授頂けると幸いです。 Function hSample(sData As String) As String sOne = Split(sData, ",") For i = 0 To UBound(sOne) For j = 1 To 255 If Int(sOne(i)) + j <> Int(sOne(i + j)) Then ElseIf j > 1 Then sOne(i) = sOne(i) & "-" & sOne(i) + j Exit For End If Next j hSample = hSample & "," & sOne(i) Next i hSample = Right(hSample, Len(hSample) - 1) End Function