Function how_many_do_you_want_to_count_to(ParamArray rCOUNTs() As Variant)
Dim v As Long, sFormula As String
sFormula = "=COUNTIFS("
For v = LBound(rCOUNTs) To UBound(rCOUNTs) Step 2
sFormula = sFormula & rCOUNTs(v).Address(0, 0, external:=True) & Chr(44) _
& rCOUNTs(v + 1).Address(0, 0, external:=True) _
& IIf(v < UBound(rCOUNTs) - 1, Chr(44), Chr(41))
Next v
how_many_do_you_want_to_count_to = Application.Evaluate(sFormula)
End Function
我希望这些代码能够更改,这样我就可以创建一个单页网站,只显示我需要在首页上显示的那些页面。
答案 0 :(得分:0)
您可以使用include
参数仅包含所需的页面。注意,此参数采用数组或逗号分隔的页面ID的
您可以尝试以下操作,仅显示第1,2和3页
$args = array(
'include' => array( 1, 2, 3 );
);
$pages = get_pages( $args );
// REST OF YOUR CODE